Ошибка при создании нового метода для нового класса в R

Question

Я получил ошибку при создании нового метода для нового класса

> setClass ("CIR", представление (PATH = "числовой", GRID = "числовой", PARAMS = "числовой"));
[1] "CIR"
>
> setMethod ("plot", signature (x = "CIR"),,
+ function (x) {
+ plot (slot (x, "GRID"), slot (x, "PATH"), type = "l")
+ очки (слот (x, «GRID»), слот (x, «PATH»), col = «красный», cex = 0.5)
+})
Ошибка в as.environment (где): недопустимый объект для as.environment

Как я могу решить это? Спасибо!

Answer 1

У вас есть две запятые в конце строки, содержащие setMethod, что означает, что вы случайно оставили definition пустым и установили where для функции. Попробуйте вместо этого:

setMethod("plot", signature(x="CIR"),
  function(x) {
  plot(slot(x,"GRID"),slot(x,"PATH"),type="l")
  points(slot(x,"GRID"),slot(x,"PATH"),col="red",cex=0.5)
})