Arrays 来自另一个矩阵的多维数组

假设

t=c(0,0.5,0.7,0.9,1,1.2) and 
v=matrix(1:40, nrow=5, ncol=8)
v
    [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8]
[1,]    1    6   11   16   21   26   31   36
[2,]    2    7   12   17   22   27   32   37
[3,]    3    8   13   18   23   28   33   38
[4,]    4    9   14   19   24   29   34   39
[5,]    5   10   15   20   25   30   35   40

我想制作一个5x6x4订单的阵列

array <- array(NA, dim = c(5, 6, 4))

---

array尝试以下嵌套循环：

ary <- array(NA, dim = c(5, 6, 4))

for (i in 1:5) {
  for (j in 1:6) {
    for (k in 1:4) {
      ary[i, j, k] <- v[i, k * 2 - 1] + v[i, k * 2] * t[j]
    }
  }
}

ari是否有任何内置函数可以在不使用嵌套循环的情况下创建这些函数？@eastclintw00d