Created
June 4, 2012 03:47
-
-
Save bobthecat/2866218 to your computer and use it in GitHub Desktop.
ppi
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ppi <- get.ppiNCBI(head(glist, 20)) | |
| [1] "7 interactions found" | |
| ## Annotate the gene list with Mus musculus metadata | |
| library(org.Mm.eg.db) | |
| ppi$egSymbol <- mget(ppi$egID, envir=org.Mm.egSYMBOL, ifnotfound=NA) | |
| ppi$intID <- mget(ppi$intSymbol, envir=org.Mm.egSYMBOL2EG, ifnotfound=NA) | |
| ppi <- ppi[,c(3,2,1,4)] | |
| ppi | |
| egSymbol intSymbol egID intID | |
| 1 Ifi202b Pou5f1 26388 18999 | |
| 2 Hes5 Jak2 15208 16452 | |
| 3 Eya1 Polr2a 14048 20020 | |
| 4 Eya1 Rbck1 14048 24105 | |
| 5 Eya1 Sharpin 14048 106025 | |
| 6 Cdk6 TGFBR1 12571 NA | |
| 7 Bcl11a Sirt1 14025 93759 |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment