8

私はgene_tableと呼ばれるRオブジェクトを持っていて、それにはクラスがありfooます。今、私はこのgene_tableを

gene_data = gene_table[1:100,1:5]

ただし、 を呼び出すとclass(gene_data)、それはもはや classfooではなく、 class を持っていmatrixます。summary.foo私のメソッドは、クラス行列のこのオブジェクトgene_dataを認識しないため、これは私にとって頭痛の種です。サブセット化するときに元のクラス属性を保持したいと思っているので、その方法を教えてもらえますか? ありがとう！

更新：dput(head(gene_table))私にくれます

c(5.21708054951994, 5.01224214039806, 4.92160314073853, 4.83031021496, 4.78552614584879, 4.77821370665578)

そしてstr(gene_table)私にくれます

 foo [1:22743, 1:2] 5.22 5.01 4.92 4.83 4.79 ...
 - attr(*, "dimnames")=List of 2
  ..$ : chr [1:22743] "ENSG00000127954" "ENSG00000151503" "ENSG00000096060" "ENSG00000091879" ...
  ..$ : chr [1:2] "Var1" "Var2"
4

1 に答える 1

5

あなたはこのようなものをあなたの定義として使うことができます[.foo：

`[.foo` <- function(x, ..., drop=TRUE) {
   structure(NextMethod(), class="foo")
}

クラスの複雑さによっては、他のものを追加する必要がある場合があります"foo"。

于 2012-09-26T21:19:34.433 に答える