# create data stream with three clusters in 2D
dsd1 <- DSD_GaussianStatic(k=3, d=2)
# plotting the data
plot(dsd1)
# create data stream with specified clusters and 20% noise
dsd2 <- DSD_GaussianStatic(k=2, d=2,
mu=rbind(c(-.5,-.5), c(.5,.5)),
noise=0.2, noise_range=rbind(c(-1,1),c(-1,1)))
plot(dsd2)
Run the code above in your browser using DataLab