来自数组的转置数组

Question

让 @Query("$SELECT_FROM $PRODUCT_TRANSACTION_TABLE WHERE write_status IN ($SALE, $AUDIT)") fun loadProductSaleTransactions(): LiveData<List<TransactionProductTable>> 为维度A[ , , ]的{​​{1}}

例如，

array

我想获得一个尺寸为[2,3,4]的新数组A <- array(1:24,c(2,3,4)) ，使得

B

针对所有[2,4,3]。

Answer 1

使用aperm：

aperm(A, c(1, 3, 2))