stream <- DSD_Gaussians(k = 3, d = 2)
# Create a clustering process that uses a window for the online stage and
# k-means for the offline stage (reclustering)
win_km <- DSC_TwoStage(
micro = DSC_Window(horizon = 100),
macro = DSC_Kmeans(k = 3)
)
win_km
update(win_km, stream, 200)
win_km
win_km$micro
win_km$macro
plot(win_km, stream)
evaluate_static(win_km, stream, assign = "macro")
Run the code above in your browser using DataLab