R

From CSBLwiki

(Difference between revisions)
Jump to: navigation, search
(Bioconductor)
(Tutorials)
Line 4: Line 4:
==Tutorials==
==Tutorials==
*R [http://www.bioconductor.org/ Bioconductor]
*R [http://www.bioconductor.org/ Bioconductor]
-
**[http://bioconductor.org/help/course-materials/ course materials]
+
**Bioconductor [http://bioconductor.org/help/course-materials/ course materials]
***[http://bioconductor.org/help/course-materials/2010/SeattleJan10/ 2010 introductory course]
***[http://bioconductor.org/help/course-materials/2010/SeattleJan10/ 2010 introductory course]
*R [http://bm2.genes.nig.ac.jp/RGM2/index.php?clear=all Graphical Manual]
*R [http://bm2.genes.nig.ac.jp/RGM2/index.php?clear=all Graphical Manual]

Revision as of 08:35, 21 October 2010

Contents

Tutorials

Tips

Packages

ape

DBI

seqinr

Bioconductor

Examples

UMLS

library(RMySQL)
library(DBI)
drv = dbDriver("MySQL")
con = dbConnect(drv,username='',password='',dbname='')
que = "select CUI1,CUI2,COF from MRCOC where SAB=\'CCPSS\'"
ccpss = dbSendQuery(con,statement=que)
ccpss.all = unlist(fetch(ccpss,n=-1))
ccpss.all = matrix(ccpss.all,length(ccpss.all)/3,3)
colnames(ccpss.all) = c('CUI1','CUI2','COF')
tmp = unique(c(ccpss.all[,1],ccpss.all[,2]))
cof = matrix(NA,10877,10877)
dimnames(cof) = list(tmp,tmp)
apply(ccpss.all,1,function(x) { cof[x[1],x[2]]=x[3] })
cof[1:10,1:10]

Links

Personal tools
Namespaces
Variants
Actions
Site
Choi lab
Resources
Toolbox