On Nov 13, 2013, at 12:24 AM, Baro wrote:
> I have a block of code:
>
> window<-5
> start<-3
> n<-1
>
> seq1 <- seq(1:40)
> mat<-matrix(seq1,40)
>
>
> while(1+window<=length(mat[,1]))
> {
> kd<-matrix(as.integer(mat[n:(n+window-1),1]))
> Sys.sleep(0.2)
>
> plot(kd,col="blue",xlab="Rohdaten
I have a block of code:
window<-5
start<-3
n<-1
seq1 <- seq(1:40)
mat<-matrix(seq1,40)
while(1+window<=length(mat[,1]))
{
kd<-matrix(as.integer(mat[n:(n+window-1),1]))
Sys.sleep(0.2)
plot(kd,col="blue",xlab="Rohdaten",ylab="values",xlim=c(start+n,start+n+window-1)
)
n<-n+1
}
I have thi
2 matches
Mail list logo
