Commit d1cff9c6 authored by Matteo Barcella's avatar Matteo Barcella
Browse files

adding typo on template analysis script

parent fe5789a9
...@@ -250,8 +250,7 @@ MethylAnalysis <- function(methcall.folder = NULL, # input folder with .cov file ...@@ -250,8 +250,7 @@ MethylAnalysis <- function(methcall.folder = NULL, # input folder with .cov file
color_list[["sex"]] = c('M' = set1cols[9], 'F' = set1cols[1]) color_list[["sex"]] = c('M' = set1cols[9], 'F' = set1cols[1])
print(color_list) print(color_list)
# Heatmap # Heatmap
...@@ -288,4 +287,4 @@ MethylAnalysis <- function(methcall.folder = NULL, # input folder with .cov file ...@@ -288,4 +287,4 @@ MethylAnalysis <- function(methcall.folder = NULL, # input folder with .cov file
saveRDS(myobj, file = paste0(outfolder,proj.id,"_methylkit.rds")) saveRDS(myobj, file = paste0(outfolder,proj.id,"_methylkit.rds"))
saveRDS(myobj, file = paste0(outfolder,proj.id,"_methylkit_meth.rds")) saveRDS(myobj, file = paste0(outfolder,proj.id,"_methylkit_meth.rds"))
} }
\ No newline at end of file
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment