错误:无法在R中找到函数绘图

问题描述:

我试图通过使用我自己的函数“foo”来估计ARIMA模型。错误代码找不到R中的函数绘图。真的困扰我。任何想法如何发生?我试过stats:::plot仍然不起作用。错误:无法在R中找到函数绘图

```{r warning=FALSE, message=FALSE} 
require(forecast) 
foo <- function(N, y1=1, p=0.8, q=1-p, seed=NULL, stepwise=TRUE, verbose=0) { 
if (!is.null(seed)) set.seed(seed) 
y <- c(y1, rep(NA,N-1)) 
for (i in 2:N) y[i] <- p*y[i-1] + q*rnorm(1) 
if (verbose) plot(y, type='l', xlab='time') 
return (list(y=y, aa=auto.arima(y, stepwise=stepwise))) 
} 
v <- foo(N=100, seed=10, verbose=1); v$aa$coef 
``` 
+0

在'plot'调用之前放置'search()',并确保'package:stats'在您的调用树上 – MichaelChirico

+0

@MichaelChirico谢谢。再试一次。现在它弹出搜索错误(绘图):未使用的参数(绘图) – xxyyzz

+1

你没有做我说的话:p – MichaelChirico

require(forecast) 
Loading required package: forecast 
> foo <- function(N, y1=1, p=0.8, q=1-p, seed=NULL, stepwise=TRUE, verbose=0) { 
+  if (!is.null(seed)) set.seed(seed) 
+  y <- c(y1, rep(NA,N-1)) 
+  for (i in 2:N) y[i] <- p*y[i-1] + q*rnorm(1) 
+  if (verbose) plot(y, type='l', xlab='time') 
+  return (list(y=y, aa=auto.arima(y, stepwise=stepwise))) 
+ } 
> v <- foo(N=100, seed=10, verbose=1); v$aa$coef 
    ar1 
0.8946974 

您的代码工作得很好。它甚至绘制的曲线图。所以也许问题出在预测软件包的加载上。或者在绘制三个冒号而不是两个冒号之前尝试使用stats :: plot。