diff options
author | Suraj Yerramilli | 2015-08-21 17:29:04 +0530 |
---|---|---|
committer | Suraj Yerramilli | 2015-08-21 17:29:04 +0530 |
commit | 797f010b3cc051128a09c03113faac41fd0da097 (patch) | |
tree | 0fc438db0a1ba51ad489ed1125ee6ef17312d0e8 /R | |
parent | 71565ab83a245b8a5e960ec106dfa203f43b0b69 (diff) | |
download | SysID-R-code-797f010b3cc051128a09c03113faac41fd0da097.tar.gz SysID-R-code-797f010b3cc051128a09c03113faac41fd0da097.tar.bz2 SysID-R-code-797f010b3cc051128a09c03113faac41fd0da097.zip |
Corrected the access options
Diffstat (limited to 'R')
-rw-r--r-- | R/ioNamesData.R | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/R/ioNamesData.R b/R/ioNamesData.R index 49db02f..a734525 100644 --- a/R/ioNamesData.R +++ b/R/ioNamesData.R @@ -21,10 +21,8 @@ inputData.idframe <- function(x,series=seq(nInputSeries(x))){ else selectSeries(x$input,series=series) } -#' @export "inputData<-" <- function(x,value) UseMethod("inputData<-") -#' @export "inputData<-.idframe" <- function(x,value){ x$input <- value x @@ -87,8 +85,10 @@ 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 |