data.frame进行矩阵计算的便捷方式

Question

像A%*%B这样的矩阵计算需要使用as.matrix()将data.frame转换为矩阵，但这种方式很麻烦。有没有更方便的方法来做这些事情？

Answer 1

如果您反对的只是在使用as.matrix之前必须在%*%中包装数据框，那么您可以制作自己的二进制函数来为您做包装

`%*df%` <- function(x, y){as.matrix(x) %*% as.matrix(y)}
x <- data.frame(a = 1:2, b = 3:4)
x %*df% x
#      a  b
#[1,]  7 15
#[2,] 10 22