Nothing
################# READ
### read only pm intensities given their position on the cel file
readQuartetCopyNb <- function(tmpExprs){
b <- 2 * 1:(length(tmpExprs)/2)
return(log2(tmpExprs[b, ]+ tmpExprs[b-1, ]))
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.