Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
custom
casertanucera_leukemia2023
Commits
d1cff9c6
Commit
d1cff9c6
authored
Jul 25, 2023
by
Matteo Barcella
Browse files
adding typo on template analysis script
parent
fe5789a9
Changes
1
Hide whitespace changes
Inline
Side-by-side
Methylation/MethylAnalysis_Adults_samples.R
View file @
d1cff9c6
...
@@ -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
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment