Hi, AR<-c(.4,.45)
MA<-c(1,.25) ARMAtoMA(ar =AR, ma = MA, lag.max = 30) picoefs <- c(1, ARMAtoMA(ar = -MA, ma = -AR, lag.max = 30)) picoefs Maybe it works! [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.