Erro in gerESET function

[yaqiongliu]

库( SCDC )
#> 警告：用 'tibble::data_frame' 替换之前的导入 'vctrs::data_frame'
#> 加载 'dplyr' 时
counts <- 矩阵( sample ( 0 : 500 , 25 ), nrow = 5 )
colnames ( counts ) <- Paste ( "cell" , 1 : 5 , sep = "" )
rownames ( counts ) <- Paste ( "gene ” , 1 :5, sep = "" )
计数
#> cell1 cell2 cell3 cell4 cell5
#>gene1 179 138 305 385 11
#>gene2 428 96 156 73 6 #>gene3 195 55
16 169 210 #>gene4 417 381 199 488 311

gene5 213 42 2 463 310 78
fdata <- rownames (计数)
pdata <- cbind (cellname = colnames (计数), 受试者 = Paste ( "病人" ,代表( 1 , 5 )))
eset <- getESET (counts , fdata = fdata , pdata = pdata )
class ( eset )
#> [1] "ExpressionSet"
#> attr(,"package")
#> [1] "Biobase"
Error in (function (classes, fdef, mtable) :
unable to find an inherited method for function ‘ExpressionSet’ for signature ‘"matrix"