lda_pandora_interactive_U<-function(data){
print(paste("Select cualitative variable for to do groups"))
V<-variable<-select.list(colnames(data))
cat("Write cuantitative variables for to do ANOVA, \n separated by commas (NOT SPACES, NOT QUOTES)\n")
print(list(colnames(data)))
readline(prompt=":")->>Z
strsplit(Z, ",")->Z
Z<-unlist(Z)
lda_pandora_U(data, V, Z)
fit
matriz_confusion
sume_confusion
stop(statistical_tests_menu_bis())
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.