factor2number = function(x, vars=NULL) {
if(is.null(vars)) {
x = as.numeric(levels( x ))[as.integer( x )]
return(x)
}
for (i in vars) {
if ( is.factor( x[,i] ) ) {
x[,i] = as.numeric(levels( x[,i] ))[as.integer( x[,i] )]
} else if ( is.character( x[,i] ) ) {
x[,i] = as.numeric(as.character(x[,i]))
}
}
return(x)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.