###################################################
### chunk number 1: data
###################################################
#line 121 "vignettes/codelink/inst/doc/codelink.Rnw"

library(codelink)

data(codelink.example)

codelink.example



###################################################
### chunk number 2: plotMA
###################################################
#line 250 "vignettes/codelink/inst/doc/codelink.Rnw"

plotMA(codelink.example)



###################################################
### chunk number 3: plotDensity
###################################################
#line 272 "vignettes/codelink/inst/doc/codelink.Rnw"

plotDensities(codelink.example)



###################################################
### chunk number 4: createWeights
###################################################
#line 310 "vignettes/codelink/inst/doc/codelink.Rnw"

w <- createWeights(codelink.example, type = list(FIDUCIAL = 0.01, NEGATIVE = 
0.1))

w[1:10,]