stream <- DSD_Benchmark(i = 1)
get_points(stream, n = 5)
if (FALSE) {
stream <- DSD_Benchmark(i = 1)
animate_data(stream, n = 10000, horizon = 100, xlim = c(0, 1), ylim = c(0, 1))
stream <- DSD_Benchmark(i = 2)
animate_data(stream, n = 10000, horizon = 100, xlim = c(0, 1), ylim = c(0, 1))
}
Run the code above in your browser using DataLab