changeset 8:e5953805ad7a draft

planemo upload for repository https://github.com/igg-molecular-biology-lab/pipe-t.git commit 7d54176ff26ed5f4411edb0582a3704dd90253c0
author davidecangelosi
date Tue, 07 May 2019 06:05:32 -0400
parents 3e099c082954
children 69f5c4d6e6bd
files pipe-t.R
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/pipe-t.R	Tue May 07 06:03:18 2019 -0400
+++ b/pipe-t.R	Tue May 07 06:05:32 2019 -0400
@@ -400,8 +400,8 @@
       raw<- readCtDataDav(files = as.vector(files$sampleName), header=FALSE,  format="plain", path = path, sample.info=phenoData,n.features = as.numeric(nfeatures))
     },
     "SDS"={
-      #columns<- list(feature=3, Ct=6, flag=11)
-      columns <-list(flag = "Omit",feature = "Detector", type = "Task", position = "Wells", Ct = "Avg.Ct")
+      columns<- list(feature=3, Ct=6, flag=11)
+      #columns <-list(flag = "Omit",feature = "Detector", type = "Task", position = "Wells", Ct = "Avg.Ct")
       metadata <- data.frame(labelDescription = c("sampleName", "Treatment"),  row.names = c("sampleName", "Treatment"))
       phenoData <- new("AnnotatedDataFrame", data = files, varMetadata = metadata)
       rownames(phenoData)=as.vector(files$sampleName)