r - Rでis.customClass関数を書くには?

Question

is.data.frameやなどの関数は誰もが知っていますis.double。おそらく実行するのは簡単ですが、グーグルで検索するのは難しいです。独自の関数を作成するにはどうすればよいですか? 関数？それを行うためのより良い方法はありますか：

is.myClass <- function(x){
if(class(x) %in% "myClass") return(TRUE)
else return(FALSE)
}

Answer 1

おそらくinherits十分です：

is.myClass <- function(x) {inherits(x,"myClass")}

x <- 1
is.myClass(x)
[1] FALSE
class(x) <- c(class(x),"myClass")
is.myClass(x)
[1] TRUE