> library(bursts)
> par(mfrow=c(2,1))
> offsets <- c(seq(0, 400, 100), seq(410, 450, 5), seq(451, 470, 2),
+ seq(480, 600, 5), 700, seq(710, 800, 5), 900, 1000)
> bursts <- kleinberg(offsets)
> plot(offsets)
> plot(bursts)
遵循 bursts 包中的演示代码。我在下面画了一个图,我只是无法将爆发结果与原始数据联系起来。爆发图表明在 400+ 时间有一个高水平爆发,我只是看不到原始图的任何爆发。谁能帮我理解如何阅读突发情节?