| Previous changeset 7:3e099c082954 (2019-05-07) Next changeset 9:69f5c4d6e6bd (2019-05-10) |
|
Commit message:
planemo upload for repository https://github.com/igg-molecular-biology-lab/pipe-t.git commit 7d54176ff26ed5f4411edb0582a3704dd90253c0 |
|
modified:
pipe-t.R |
| b |
| diff -r 3e099c082954 -r e5953805ad7a pipe-t.R --- a/pipe-t.R Tue May 07 06:03:18 2019 -0400 +++ b/pipe-t.R Tue May 07 06:05:32 2019 -0400 |
| b |
| @@ -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) |