Missing parenthesis for database access commands added
git-svn-id: file:///humgen/gsa-scr1/gsa-engineering/svn_contents/trunk@5755 348d0f76-0448-11de-a6fe-93d51630548a
This commit is contained in:
parent
23efd66d31
commit
3e8fc71743
|
|
@ -26,9 +26,9 @@ lane<-data.frame()
|
|||
samp<-data.frame()
|
||||
for(squid in squids){
|
||||
gsa.read.squidmetrics(squid, TRUE)->lanemetrics
|
||||
addlanes<-lanemetrics[which(lanemetrics$"Individual ID" %in% settable[,2],]
|
||||
addlanes<-lanemetrics[which(lanemetrics$"Individual ID" %in% settable[,2]),]
|
||||
gsa.read.squidmetrics(squid, FALSE)->samplemetrics
|
||||
addsamps<-samplemetrics[which(samplemetrics$"Sample" %in% settable[,2],]
|
||||
addsamps<-samplemetrics[which(samplemetrics$"Sample" %in% settable[,2]),]
|
||||
lane<-rbind(lane, addlanes)
|
||||
samp<-rbind(samp, addsamps)
|
||||
}
|
||||
|
|
|
|||
Loading…
Reference in New Issue