Nothing
### PREDICTION ####
methods::setMethod(
f="predict",
signature = "ResultClassifOrdinal",
definition = function(object, x=matrix(0,nrow=1,ncol=1)) {
res <- predictions(object, x)
return(res)
}
)
### PLOTTING ###
methods::setGeneric("plot",function(object){standardGeneric("plot")})
methods::setMethod(
f="plot",
signature = c("ResultClassifOrdinal"),
definition = function(object) {
bosplot(object)
}
)
methods::setMethod(
f="plot",
signature = c("ResultCoclustOrdinal"),
definition = function(object) {
bosplot(object)
}
)
methods::setMethod(
f="plot",
signature = c("ResultClustOrdinal"),
definition = function(object) {
bosplot(object)
}
)
### summaryING ###
methods::setGeneric("summary",function(object){standardGeneric("summary")})
methods::setMethod(
f="summary",
signature = c("ResultClassifOrdinal"),
definition = function(object) {
bossummary(object)
}
)
methods::setMethod(
f="summary",
signature = c("ResultCoclustOrdinal"),
definition = function(object) {
bossummary(object)
}
)
methods::setMethod(
f="summary",
signature = c("ResultClustOrdinal"),
definition = function(object) {
bossummary(object)
}
)
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.