Tempo real, atualização automática, plotagem incremental em R

Eu estou tentando fazer um enredo dinâmico, como atualização automática, incremental, possivelmente em tempo real. Eu quero fazer algo assimhttp://www.youtube.com/watch?v=s7qMxpDUS3c

Isto é o que eu fiz até agora. Suponha que você tenha uma série temporal em um data.frame chamado temp. Primeira coluna é a hora e a segunda coluna é onde estão os valores.

for(i in 1: length(temp$Time[1:10000]))
{
flush.console()
plot(temp$Time[i:i+100],temp$Open[i:i+100],
xlim=c(as.numeric(temp$Time[i]),as.numeric(temp$Time[i+150])),
ylim=c(min(temp$Open[i:i+100]),max(tmep$Open[i:i+120])))
Sys.sleep(.09)
}

Isso é plotado de forma incremental, mas eu não obtenho as séries longas de 100 unidades, em vez de obter apenas um ponto de atualização.

questionAnswers(1)

yourAnswerToTheQuestion