すでに同じ名前の関数がある場合は、S4メソッドを定義してください。

Question

私は関数myFunctionを持っています。私は同じ名前のS4メソッドを作成する必要があります。
私は古い機能をmyFunctionにしておきたいと思います。

古い機能を維持する方法はありますか？

署名は非常に異なる場合がありますように私はむしろ、この古い機能のための一般的な設定ではないでしょう...

Answer 1

はい、あなたの古い機能を維持するための方法があります。そして、S3とS4の両方の関数が同じクラスの同じ数の引数を受け入れることを望んでいない限り、それはやることさえ複雑ではありません。

# Create an S3 function named "myFun" 
myFun <- function(x) cat(x, "\n") 

# Create an S4 function named "myFun", dispatched when myFun() is called with 
# a single numeric argument 
setMethod("myFun", signature=signature(x="numeric"), function(x) rnorm(x)) 

# When called with a numeric argument, the S4 function is dispatched 
myFun(6) 
# [1] 0.3502462 -1.3327865 -0.9338347 -0.7718385 0.7593676 0.3961752 

# When called with any other class of argument, the S3 function is dispatched 
myFun("hello") 
# hello 

あなたはは、Rは、いくつかを持っているように、引数のクラスを設定するには、次のような何かをする必要があります、S3関数と引数の同じ型を取るためにS4の機能をしたいですか場合あなたはそれを使用しようとしている2つの関数の卜の方法：基本的に私はそれが**紛争のケースであるかどうかを知りたい

setMethod("myFun", signature=signature(x="greeting"), 
      function(x) cat(x, x, x, "\n")) 

# Create an object of class "greeting" that will dispatch the just-created 
# S4 function 
XX <- "hello" 
class(XX) <- "greeting" 
myFun(XX) 
# hello hello hello 

# A supplied argument of class "character" still dispatches the S3 function 
myFun("hello") 
# hello