我收到消息當超類是「VIRTUAL」時,爲什麼會收到消息「節點堆棧溢出」?
錯誤parent.frame():節點堆棧溢出 錯誤綜合報導期間:節點堆棧溢出
當我嘗試構建使用S4命令「作爲」的對象,但只有當超宣佈「虛擬」。
類層次結構如下所示:
PivotBasic包含樞軸包含型號
爲樞紐和樞紐基本的setClass命令和PivotBasic構造如下。類Pivot沒有構造函數。 Model構造函數太大而無法插入。
這實在不是什麼大不了的(我認爲),因爲如果「虛擬」的關鍵字從setClass的代表性說法去除一切工作正常。但我很好奇這個問題的原因。有人會對此有所洞察嗎?
感謝,
費爾南多·薩爾達尼亞
setClass(Class = "Pivot",
representation = representation(
pivotName = "character",
pivotNames = "character",
pivotData = "data.frame",
"VIRTUAL"
),
contains = "Model"
)
setClass(Class = "PivotBasic",
representation = representation(),
contains = "Pivot"
)
pivotBasic <- function(
portfolio,
assets,
controlVariableList,
pivotData = NULL, # pivotName is ignored if pivotData is not null
pivotName = "N_WEEKDAY_3_6",
firstPredictionDate = as.Date(integer(), origin = "1970-01-01"),
name = NULL,
tags = "Event"
) {
if (missing(portfolio)) stop("[PivotBasic: pivotBasic] - Missing portfolio argument")
if (missing(assets)) stop("[PivotBasic: pivotBasic] - Missing assets argument")
if (missing(controlVariableList)) stop("[PivotBasic: pivotBasic] - Missing controlVariableList argument")
object <- model(
portfolio,
assets,
controlVariableList,
firstPredictionDate,
name,
tags)
# The error message happens when this command is executed
mdl <- as(object, "PivotBasic")
# Other code
mdl
} # end pivotBasic
是什麼型號的功能做的,你爲什麼不使用'新(「PivotBasic」,...)'?如果您生成最小可重現的示例,則更有可能獲得幫助。 – hadley 2013-05-04 15:32:29