Quick introduction to the package.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | # programmer/engineer info from 2000 Census
data(prgeng)
# select some columns of interest
pe <- prgeng[,c(1,3,5,7:9)]
# remove some extreme values
pe25 <- pe[pe$wageinc < 250000,]
# some numeric variables are really factors
pe25 <- makeFactor(pe25,c('educ','occ','sex'))
# convert the continuous variables to discrete
pe25disc <- discretize(pe25,nlevels=5)
## Not run:
# display
discparcoord(pe25disc,k=150)
# then possibly brush, etc.
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.