如何在R矩阵中找到移动标准差?