data(NanoStringData)
## obtain negative control genes
negativeControl(NanoStringData)
## assign a matrix
n=ncol(exprs(NanoStringData))
r=nrow(negativeControl(NanoStringData))
negative=matrix(rpois(r*n,10),ncol=n)
negativeControl(NanoStringData)=negative
Run the code above in your browser using DataLab