我正在寻找一种快速方法来从 R 数组中删除冗余维度,类似于squeeze()
MATLAB 中的命令。
现在我结合了melt()
和cast()
命令来自reshape2
包,但应该有一种不太复杂的方法来做同样的事情。
到目前为止我就是这样做的:
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
听起来您正在寻找drop()
,它“删除只有一层的数组维度”。
drop(array3d)
# [,1] [,2]
# [1,] 0 0
# [2,] 0 0
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)