R/Spiked.R

#Spiked apples dataload
library(BioMark)

library(BioMark)
data("spikedApples")



xx <- as.matrix(as.data.frame(spikedApples$dataMatrix))
yy <- as.factor(c(rep(1,10),rep(2,10)))

x <- xx
x[x<=0] <- 0.1
biomarker = paste0('x.',colnames(spikedApples$dataMatrix)[spikedApples$biom])
walachja/cellrPLR documentation built on May 22, 2019, 2:47 p.m.