powered by
"predict"(object, x, ...) "predict"(object, x, ...)
pdmClass
library(fibroEset) data(fibroEset) y <- as.numeric(pData(fibroEset)[,2]) x <- t(exprs(fibroEset)) genes <- featureNames(fibroEset) tmp <- pdmClass(y ~ x) predict(tmp)
Run the code above in your browser using DataLab