Mercurial > repos > kpbioteam > minfi_rset

annotate minfi_rset.R @ 0:c3b42276697a draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload for repository https://github.com/lh3/seqtk
author kpbioteam
date Mon, 05 Feb 2018 06:56:59 -0500
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
c3b42276697a planemo upload for repository https://github.com/lh3/seqtk
kpbioteam
parents:
diff changeset
1
c3b42276697a planemo upload for repository https://github.com/lh3/seqtk
kpbioteam
parents:
diff changeset
2 require("minfi", quietly = TRUE)
c3b42276697a planemo upload for repository https://github.com/lh3/seqtk
kpbioteam
parents:
diff changeset
3
c3b42276697a planemo upload for repository https://github.com/lh3/seqtk
kpbioteam
parents:
diff changeset
4 args <- commandArgs(trailingOnly = TRUE)
c3b42276697a planemo upload for repository https://github.com/lh3/seqtk
kpbioteam
parents:
diff changeset
5
c3b42276697a planemo upload for repository https://github.com/lh3/seqtk
kpbioteam
parents:
diff changeset
6 input = args[1]
c3b42276697a planemo upload for repository https://github.com/lh3/seqtk
kpbioteam
parents:
diff changeset
7 output = args[2]
c3b42276697a planemo upload for repository https://github.com/lh3/seqtk
kpbioteam
parents:
diff changeset
8
c3b42276697a planemo upload for repository https://github.com/lh3/seqtk
kpbioteam
parents:
diff changeset
9 MSet <- get(load(input))
c3b42276697a planemo upload for repository https://github.com/lh3/seqtk
kpbioteam
parents:
diff changeset
10
c3b42276697a planemo upload for repository https://github.com/lh3/seqtk
kpbioteam
parents:
diff changeset
11 RSet <- ratioConvert(MSet, what = "both", keepCN = TRUE)
c3b42276697a planemo upload for repository https://github.com/lh3/seqtk
kpbioteam
parents:
diff changeset
12
c3b42276697a planemo upload for repository https://github.com/lh3/seqtk
kpbioteam
parents:
diff changeset
13 save(RSet,file = output)
c3b42276697a planemo upload for repository https://github.com/lh3/seqtk
kpbioteam
parents:
diff changeset
14