R 矩阵%*%矩阵中的错误：需要数字复杂矩阵向量参数

发布于04月09日

我在用R做矩阵乘法.我已经成功地创建并运行了矩阵Matrix1，但在try 乘法时发现了一个错误:

Matrix1 = new("markovchain", states = c("state 1", "state 2", "state 3"),
              transitionMatrix = matrix(data = c(0,1,0,
                                                0.7,0,0.3,
                                                0.5, 0, 0.5),
                                        byrow = TRUE, nrow = 3), 
               name = "Matrix Name")

Matrix1

TwoStep = Matrix1%*%Matrix1
TwoStep

我发现Matrix1是S4型的.我试着用as.matrix把它转换成S4到矢量，但它没有工作:

> as.matrix(Matrix1)
Error in as.vector(data) : 
  no method for coercing this S4 class to a vector

推荐答案

library(markovchain)

Matrix1 = new("markovchain", states = c("state 1", "state 2", "state 3"),
              transitionMatrix = matrix(data = c(0,1,0,
                                                 0.7,0,0.3,
                                                 0.5, 0, 0.5),
                                         byrow = TRUE, nrow = 3), 
              name = "Matrix Name")

class(Matrix1)
#> [1] "markovchain"
#> attr(,"package")
#> [1] "markovchain"
class(Matrix1[])
#> [1] "matrix" "array"


Matrix1[]%*%Matrix1[]
#>         state 1 state 2 state 3
#> state 1    0.70     0.0    0.30
#> state 2    0.15     0.7    0.15
#> state 3    0.25     0.5    0.25

^{创建于2024—04—09，reprex v2.0.2}