inst/examples/R/data/cluster/divisive_cluster/example_diana.R
In sigbertklinke/shinyExample: Create and run simple (interactive) programs as Shiny apps
library("cluster")
library("mlbench") # for Boston Housing data
data(BostonHousing2)
# prepare data
x <- BostonHousing2[,-c(1:5,10,15)]
x <- scale(x)
#
cl <- diana(x)
hcl <- cutree(as.hclust(cl), k = 2)
par(mfrow=c(1,1))
plot(BostonHousing2$lon, BostonHousing2$lat, col=hcl,
pch=19, cex=0.5)
sigbertklinke/shinyExample documentation built on May 26, 2019, 4:32 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
library("cluster")
library("mlbench") # for Boston Housing data
data(BostonHousing2)
# prepare data
x <- BostonHousing2[,-c(1:5,10,15)]
x <- scale(x)
#
cl <- diana(x)
hcl <- cutree(as.hclust(cl), k = 2)
par(mfrow=c(1,1))
plot(BostonHousing2$lon, BostonHousing2$lat, col=hcl,
pch=19, cex=0.5)
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.