Displaying 1 result from an estimated 1 matches for "genenamevec".
2011 Jun 10
2
Sorting Data Frame Without Loop
...uot;, "NM_207330", "NM_207330")
colC <- c( 'NARG1', 'TBDN100', 'FLJ30277', 'FLJ31659', 'NIPAL1', 'NPAL1')
dupes <- data.frame(ProteinID=colA, GeneID=colB, GeneName=colC)
idVec <- character()
geneIDVec <- character()
geneNameVec <- character()
dataType <- "ProteinID"
annotation <- data.frame()
for (id in unique(dupes[[dataType]])) {
print (id)
idVec <- c(idVec, id)
geneIDVec <- c(geneIDVec, paste(unique(dupes$GeneID[dupes[[dataType]] == id]), collapse=", "))...