r - 在每个循环上设置绘图的 x 轴

Question

我有一段代码：

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
}

我有这样的期望，在每个循环上，两个 x 轴和 y 轴都会改变，并查看绘图上的值。但我看不到价值。我应该怎么做才能拥有价值？如果我将其更改为我的代码

plot(kd,col="blue",xlab="Rohdaten",ylab="values")

我可以看到值，但在 x 轴上我没有正确的值

Answer 1

您正在创建的矩阵kd具有与原始矩阵不同的索引。因此，指数总是从 1 到 5。你应该用你的 xlimits 绘制整个矩阵。

while(n+window<=length(mat[,1]))
{
  Sys.sleep(0.2)
  plot(mat,col="blue",xlab="Rohdaten",ylab="values",xlim=c(start+n,start+n+window-1))
  n<-n+1
}

ylim如果您并不总是想要矩阵中的整个 y 值范围，那么您当然也可以添加 a 。