thyroidData.DataGenerator <- function(dataConf) {
n <- dataConf$n
path <- GetDatafilepath('thyroid')
thyroid <-read.csv(path,head=F)
x<-thyroid[,-1]
y<-thyroid[,1]
y<-factor(y)
population <- as.data.frame(cbind(x, y))
return(population)
}
thyroidData.Prepackages <- c()
thyroidData.validataion <- function(dataConf) {
if( is.null(dataConf$n) ) return(FALSE)
return(TRUE)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.