R：高效地从数组中移除单例维度

Question

我正在寻找一种快速从R数组中删除冗余维度的方法，类似于MATLAB中的squeeze()命令。 目前我结合了reshape2包中的melt()和cast()命令，但应该有更简单的方法来实现同样的效果。

这是我目前的做法：

    require(reshape2)
    array3d <- array(rep(0,4),dim=c(1,2,2)) # create a 2*2 matrix within a 3-d array
    acast(melt(array3d),Var2~Var3) # recover the matrix

- Matthias Schmidtblaicher

Answer 1

听起来你正在寻找drop()函数，它可以“删除只有一个维度的数组”。

drop(array3d)
#       [,1] [,2]
# [1,]    0    0
# [2,]    0    0

- Josh O'Brien