summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--R/poly.R6
1 files changed, 3 insertions, 3 deletions
diff --git a/R/poly.R b/R/poly.R
index 4a96617..5c3d794 100644
--- a/R/poly.R
+++ b/R/poly.R
@@ -1,13 +1,13 @@
#' @export
-idpoly <- function(A,B,C,D,E,F1,ioDelay=0){
- out <- list(A= A,B=B,C=C,D=D,E=E,F1=F1,ioDelay = ioDelay)
+idpoly <- function(A,B,C,D,F1,ioDelay=0){
+ out <- list(A= A,B=B,C=C,D=D,F1=F1,ioDelay = ioDelay)
class(out) <- "idpoly"
return(out)
}
#' @export
arx <- function(A,B,ioDelay=0){
- out <- idpoly(A=A,B=B,C=1,D=1,E=1,F1=1,ioDelay = ioDelay)
+ out <- idpoly(A=A,B=B,C=1,D=1,F1=1,ioDelay = ioDelay)
class(out) <- c("arx","idpoly")
return(out)
}