summaryrefslogtreecommitdiff
path: root/R
diff options
context:
space:
mode:
Diffstat (limited to 'R')
-rw-r--r--R/estpoly.R15
1 files changed, 7 insertions, 8 deletions
diff --git a/R/estpoly.R b/R/estpoly.R
index 7d85408..8e72f76 100644
--- a/R/estpoly.R
+++ b/R/estpoly.R
@@ -126,9 +126,8 @@ residplot <- function(model,newdata=NULL){
#' \ldots + b_{nk+nb} u[k-nk-nb] + e[k]
#' }
#' The function estimates the coefficients using linear least squares (with
-#' no regularization). Future versions may include regularization
-#' parameters as well
-#' \\
+#' regularization).
+#' \cr
#' The data is expected to have no offsets or trends. They can be removed
#' using the \code{\link{detrend}} function.
#'
@@ -212,7 +211,7 @@ arx <- function(x,order=c(0,1,0),lambda=0.1){
#' }
#' The function estimates the coefficients using non-linear least squares
#' (Levenberg-Marquardt Algorithm)
-#' \\
+#' \cr
#' The data is expected to have no offsets or trends. They can be removed
#' using the \code{\link{detrend}} function.
#'
@@ -300,7 +299,7 @@ armax <- function(x,order=c(0,1,1,0),options=optimOptions()){
#' }
#' The function estimates the coefficients using non-linear least squares
#' (Levenberg-Marquardt Algorithm)
-#' \\
+#' \cr
#' The data is expected to have no offsets or trends. They can be removed
#' using the \code{\link{detrend}} function.
#'
@@ -404,7 +403,7 @@ oe <- function(x,order=c(1,1,0),options=optimOptions()){
#'
#' The function estimates the coefficients using non-linear least squares
#' (Levenberg-Marquardt Algorithm)
-#' \\
+#' \cr
#' The data is expected to have no offsets or trends. They can be removed
#' using the \code{\link{detrend}} function.
#'
@@ -440,8 +439,8 @@ oe <- function(x,order=c(1,1,0),options=optimOptions()){
#' residplot(mod_bj) # residual plots
#'
#' @export
-bj <- function(z,order=c(1,1,1,1,0),init_sys=NULL,
- options=optimOptions()){
+bj <- function(z,order=c(1,1,1,1,0),
+ init_sys=NULL,options=optimOptions()){
y <- outputData(z); u <- inputData(z); N <- dim(y)[1]
nb <- order[1];nc <- order[2]; nd <- order[3];
nf <- order[4]; nk <- order[5];