R中两个不同对象签名的setMethod

setMethod for two different object signature in R

如何使用一个setMethod使下面两行代码的函数段相同?喜欢签名("Triangle|Square")。谢谢。

setMethod("sides", signature("Triangle"), function(object) 3)
setMethod("sides", signature("Square"), function(object) 3)

通常的做法是

.sides_body = function(object) 3
setMethod("sides", "Triangle", .sides_body)
setMethod("sides", "Square", .sides_body)

除非存在 class 关系并且 classes

中的定义相同
setClass("Shape")
setClass("Triangle", contains="Shape")
setClass("Square", contains="Shape")
setClass("Circle", contains="Shape")
setMethod("sides", "Shape", function(boject) 3)
setMethod("sides", "Circle", function(object) Inf)