diff options
| -rw-r--r-- | NAMESPACE | 4 | ||||
| -rw-r--r-- | R/ioNamesData.R | 4 |
2 files changed, 0 insertions, 8 deletions
@@ -2,8 +2,6 @@ S3method("inputData<-",idframe) S3method("inputNames<-",idframe) -S3method("outputData<-",idframe) -S3method("outputNames<-",idframe) S3method(inputData,default) S3method(inputData,idframe) S3method(inputNames,default) @@ -29,8 +27,6 @@ S3method(summary,estARX) S3method(summary,idframe) export("inputData<-") export("inputNames<-") -export("outputData<-") -export("outputNames<-") export(armax) export(arx) export(bj) diff --git a/R/ioNamesData.R b/R/ioNamesData.R index 19d82aa..49db02f 100644 --- a/R/ioNamesData.R +++ b/R/ioNamesData.R @@ -67,10 +67,8 @@ outputData.idframe <- function(x,series=seq(nOutputSeries(x))){ else selectSeries(x$output,series=series) } -#' @export "outputData<-" <- function(x,value) UseMethod("outputData<-") -#' @export "outputData<-.idframe" <- function(x,value){ x$output <- value x @@ -89,10 +87,8 @@ outputNames.idframe <- function(x){ seriesNames(outputData(x)) } -#' @export "outputNames<-" <- function(x,value) UseMethod("outputNames<-") -#' @export "outputNames<-.idframe" <- function(x,value){ seriesNames(outputData(x)) <- value x |