## Not run:
# data(iris)
#
# irisClass <- iris[,5]
# irisData <- iris[,-5]
#
# ens <- cfBuild(irisData, irisClass, bootNum = 100, ensNum = 100, parallel = TRUE,
# cpus = 4, type = "SOCK")
#
# # Show the percentages of correctly classified samples in
# # a barplot with or without text respectively
#
# ggClassPred(ens)
# ggClassPred(ens, showText = TRUE)
#
# # Show the percentages of classified and missclassified samples
# # in a barplot simultaneously with and without text
#
# ggClassPred(ens, displayAll = TRUE)
# ggClassPred(ens, position="stack", displayAll = TRUE)
# ggClassPred(ens, position="stack", displayAll = TRUE, showText = TRUE)
#
# # Alernatively, using a dodge position
# ggClassPred(ens, position = "dodge", displayAll = TRUE)
# ggClassPred(ens, position = "dodge", displayAll = TRUE, showText = TRUE)
# ## End(Not run)
Run the code above in your browser using DataLab