Description Usage Arguments Value Author(s) Examples
This function predicts values based upon biosign
classifiers trained
on the 'S' signature
1 2 |
object |
An S4 object of class |
newdata |
Either a data frame or a matrix, containing numeric columns only, with column names identical to the 'x' used for model training with 'biosign'. |
tierMaxC |
Character: Maximum level of tiers to display: Either 'S'or 'A'. |
... |
Currently not used. |
Data frame with the predictions for each classifier as factor columns.
Philippe Rinaudo and Etienne Thevenot (CEA)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 | ## loading the diaplasma dataset
data(diaplasma)
attach(diaplasma)
## restricting to a smaller dataset for this example
featureSelVl <- variableMetadata[, "mzmed"] >= 490 & variableMetadata[, "mzmed"] < 500
dataMatrix <- dataMatrix[, featureSelVl]
variableMetadata <- variableMetadata[featureSelVl, ]
## training the classifiers
## a bootI = 5 number of bootstraps is used for this example
## we recommend to keep the default bootI = 50 value for your analyzes
set.seed(123)
diaSign <- biosign(dataMatrix, sampleMetadata[, "type"], bootI = 5)
## fitted values (for the subsets restricted to the 'S' signatures)
sFitDF <- predict(diaSign)
## confusion tables
print(lapply(sFitDF, function(predFc) table(actual = sampleMetadata[,
"type"], predicted = predFc)))
## balanced accuracies
sapply(sFitDF, function(predFc) { conf <- table(sampleMetadata[,
"type"], predFc)
conf <- sweep(conf, 1, rowSums(conf), "/")
mean(diag(conf))
})
## note that these values are slightly different from the accuracies
## returned by biosign because the latter are computed by using the
## resampling scheme selected by the bootI or crossvalI arguments
getAccuracyMN(diaSign)["S", ]
detach(diaplasma)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.