using length of mutation bcr codes

averissimo · Oct 17, 2018 · 2049bdf · 2049bdf
1 parent e2a6b4d
commit 2049bdf
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/vignettes/build_data.Rmd b/vignettes/build_data.Rmd
@@ -280,7 +280,7 @@ mutation.bcrcodes <- mutation$data$Tumor_Sample_Barcode %>%
   getParticipantCode %>% unique %>% sort
 
 mutation$count <- matrix(integer(1), 
-                         ncol     = nrow(gdc$clinical), 
+                         ncol     = length(mutation.bcrcodes), 
                          nrow     = length(unique(mutation$data$Gene)), 
                          dimnames = list(unique(mutation$data$Gene), 
                                          mutation.bcrcodes))