dsd <- DSD_Gaussians(k=3, d=2)
dsc <- DSC_DStream(gridsize=.1)
cluster(dsc, dsd, 500)
dsc
# getting the micro-cluster centers
get_centers(dsc)
# D-Stream also has macro-clusters
get_centers(dsc, type="macro")
Run the code above in your browser using DataLab