Temps réel, mise à jour automatique, intrigue incrémentale dans R

Je suis en train de faire une intrigue dynamique, une sorte de mise à jour automatique, supplémentaires, éventuellement en temps réel.
Je veux accomplir quelque chose comme ceci
http://www.youtube.com/watch?v=s7qMxpDUS3c

C'est ce que j'ai fait jusqu'à présent. Supposons que vous avez une série chronologique de données.cadre temp. La première colonne est le temps et la deuxième colonne est l'endroit où les valeurs sont.

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)
}

Ce n'parcelle de manière incrémentielle, mais je n'ai pas l'100 parts des séries longues au lieu de cela j'ai juste un point de mise à jour.

source d'informationauteur user1507176

  1. 23

    Voulez-vous faire quelque chose comme cela?

    n=1000
df=data.frame(time=1:n,y=runif(n))
window=100
for(i in 1:(n-window)) {
    flush.console()
    plot(df$time,df$y,type='l',xlim=c(i,i+window))
    Sys.sleep(.09)
}

    Passe dans votre code:

    # for(i in 1: length(temp$Time[1:10000])) { 
for (i in 1:10000) # The length of a vector of 10000 is always 10000
    flush.console()
    # plot(temp$Time[i:i+100],temp$Open[i:i+100],
    # Don't bother subsetting the x and y variables of your plot.
    # plot() will automatically just plot those in the window.
    plot(temp$Time,temp$Open, 
    xlim=c(as.numeric(temp$Time[i]),as.numeric(temp$Time[i+150]))
    # Why are you setting the y limits dynamically? Shouldn't they be constant?
    # ,ylim=c(min(temp$Open[i:i+100]),max(tmep$Open[i:i+120])))
    Sys.sleep(.09)
}