diff options
-rw-r--r-- | R/nonparam.R | 5 | ||||
-rw-r--r-- | man/etfe.Rd | 6 |
2 files changed, 7 insertions, 4 deletions
diff --git a/R/nonparam.R b/R/nonparam.R index e51fcaf..9897a04 100644 --- a/R/nonparam.R +++ b/R/nonparam.R @@ -232,6 +232,7 @@ mult_ccf <- function(X,Y=NULL,lag.max=30){ #' ratio of the fourier transforms of the output and the input variables #' #' @param data an object of class \code{idframe} +#' @param n frequency spacing (Default: \code{128}) #' #' @return #' an \code{idfrd} object containing the estimated frequency response @@ -243,8 +244,8 @@ mult_ccf <- function(X,Y=NULL,lag.max=30){ #' @seealso \code{\link[stats]{fft}} #' #' @examples -#' data(frf) -#' frf <- etfe(data) +#' data(arxsim) +#' frf <- etfe(arxsim) #' #' @export etfe <- function(data,n=128){ diff --git a/man/etfe.Rd b/man/etfe.Rd index c2e31cb..662ff4a 100644 --- a/man/etfe.Rd +++ b/man/etfe.Rd @@ -8,6 +8,8 @@ etfe(data, n = 128) } \arguments{ \item{data}{an object of class \code{idframe}} + +\item{n}{frequency spacing (Default: \code{128})} } \value{ an \code{idfrd} object containing the estimated frequency response @@ -17,8 +19,8 @@ Estimates the emperical transfer function from the data by taking the ratio of the fourier transforms of the output and the input variables } \examples{ -data(frf) -frf <- etfe(data) +data(arxsim) +frf <- etfe(arxsim) } \references{ |