【发布时间】:2017-09-27 21:49:28
【问题描述】:
我需要在 Matlab 中编写包“张量”的这一部分,它是用 R 编写的。不幸的是,我不习惯 R 代码风格。
A=matrix(sample(0:1, 2 * 3, replace = TRUE), 2, 3)
这里是R中的代码:
A <- as.array(A)
dimA <- dim(A)
dnA <- dimnames(A)
seqA <- seq(along=dimA)
allA <- length(seqA) == length(alongA)
permA <- c(seqA[-alongA], alongA)
if (!all(seqA == permA))
A <- aperm(A, permA)
dim(A) <- c(
if (allA) 1 else prod(dimA[-alongA]),
prod(dimA[alongA])
)
提前感谢您的帮助!
【问题讨论】: