# NOT RUN {
# data with 2 clusters in 2 dimensions
stream = DSD_Gaussians(2,2, mu = rbind(c(-10,-10), c(10,10)))
# cluster with D-Stream
dstream <- DSC_DStream_MOA(decayFactor=0.998)
update(dstream, stream, 10000)
dstream
# plot macro-clusters
plot(dstream, stream, type= "macro")
# }
Run the code above in your browser using DataCamp Workspace