# NOT RUN {
data(Election2005)
# }
# NOT RUN {
# Use whole data set with default settings
selectscat(Election2005)
# 7 variables and a higher chance of finding optimal matrix
selectscat(Election2005,k=7,r=15)
# Use correlation as the measure of relevance
selectscat(Election2005,criteria="cor")
# boring for the election data
# same result as
election_num <- Election2005[,sapply(Election2005,is.numeric)]
selectscat(election_num,relmat=cor(election_num),plot=FALSE)
# If a list of class "sdfdata" is already calculated
sdfdf <- sdf(Election2005)
# Use only measure "Outlying"
sdfdf_O <- sdfdf
sdfdf_O$sdf <- sdfdf_O$sdf[,c(1,10,11)]
selectscat(sdfdf_O,k=7,r=15)
# }
Run the code above in your browser using DataLab