为什么不是'；R中的mean（）函数是否给出了正确的结果？

我一直在练习R（3.6.3）的基础知识，我已经花了好几个小时试图理解这个问题。这就是练习：

步骤1：生成总长度为100的1到3之间的数据序列#使用抖动功能（大系数）为数据添加噪声 步骤2：用5个连续点的平均值计算滚动平均值roll.mean的向量。这个向量只有96个平均值。 步骤3：将这些平均值的向量添加到绘图中 步骤4：通过使用参数conce（默认值=5）和y生成一个函数来概括步骤2和步骤3

这就产生了这样一个情节：

然后，我使用函数来概括（它要求我推广步骤2和3，因此忽略了数据创建步骤），并且我认为y保持不变）：

fun50=函数（连续=5，y）
{
roll.mean你有这条线

    roll.mean[i] <- mean(y[i:i+consec-1]) # Using mean(), I'm able to generalize.

所以要解决这个问题，只需添加一些括号

roll.mean[i] <- mean(y[i:(i+consec-1)]) # Using mean(), I'm able to generalize.

roll.意思是[i]你有台词

    roll.mean[i] <- mean(y[i:i+consec-1]) # Using mean(), I'm able to generalize.

所以要解决这个问题，只需添加一些括号

roll.mean[i] <- mean(y[i:(i+consec-1)]) # Using mean(), I'm able to generalize.

roll.mean[i]有一点需要注意的是，你可能会考虑以前的价值观而不是当前观察的价值观。通常，像滚动手段这样的东西被用来平滑事物的时间序列类型，而不必“合理”地考虑未来的观测值来平滑你当前的价值。R查看前面的值，而不是当前观察之前的值。通常，像滚动工具这样的东西被用于平滑时间序列类型的事物，并且不一定“公平”地考虑将来的观察来平滑当前值。
roll.mean[i] <- mean(y[i:(i+consec-1)]) # Using mean(), I'm able to generalize.