在一定频率后循环填充矩阵

Question

我的目标是以102（510/5）的频率将这些值转换为64天。每天有510个值，我想每5个值中选取一个（1,6,11，...制成102 * 64的最终矩阵）。使用以下代码：

    data <- read.csv(file="voljump.csv", header=FALSE, sep=",")#32640
    mat <- data.matrix(data)
            fin_data <- t(mat)
             days <- nrow(data)#32640
    freq <- 510
    data_5 <- matrix(0, freq, days) 
    for(j in 1:days) {for (i in 1:freq) 
      {data_5[i,j] <- fin_data[(i-1)*4+1 ,j]}}     

我遇到错误：

“ fin_data [（i-1）* 5 + 1，j]中的错误：下标超出范围”

Answer 1

我想以下代码可能会达到您的目标

ModelForm