我正在运行一台只有 R 2.10 且无法更新的机器（这是事实：无法更改）。
我需要使用“expm”包的功能来获取矩阵的 k 次幂（它是函数%^%）但我不知道如何复制源代码，因为这个包的最早版本是为晚于 R的版本制作的2.10。在 R 上，安装expm包后，运行：
library(expm)
getAnywhere('%^%')
给了我源代码，但是当我在表单中复制这个源代码时%^% <- *source code*，我得到了错误
Error in stopifnot(is.numeric(x) || is(x, "dMatrix"), length(d <- dim(x)) == :
object 'x' not found
谁能帮我弄清楚如何通过源代码使用 %^% 的原始实现？