Una vez obtuve la respuesta a una pregunta sobre cómo contar cuántas veces la función 'auto.arima ()' confirma realmente el orden en la función 'arima.sim ()' si las funciones 'arima.sim ()' se ejecutan 10 veces como R Cuenta cuántos Hora `auto.arima ()` Confirmar`arima.sim () `para ser verdadero

cnt <- 0
for(i in 1:10) { 
   ar1 <- arima.sim(n = 80, model=list(ar=0.8, order = c(1, 0, 0)))
   ar2 <- auto.arima(ar1)
   if(all(arimaorder(ar2) == c(1, 0, 0))) cnt <- cnt + 1}
cnt

¿Cómo puedo contar cuántas veces debo ejecutar la función 'arima.sim (n = 80, model = list (ar = 0.8, order = c (1, 0, 0)))' en un bucle para saber cuántas veces el pedido ¿No será '(1, 0, 0)' hasta que obtenga el orden '(1, 0, 0)'?

-1
Daniel James 27 ago. 2020 a las 08:33

1 respuesta

La mejor respuesta

Puede usar el bucle while y contar el bucle si no es el orden, detenerse si es

count <-0
while(TRUE){
    ar1 <- arima.sim(n = 80, model=list(ar=0.8, order = c(1, 0, 0)))
    ar2 <- auto.arima(ar1)
    if(all(arimaorder(ar2)==c(1,0,0))) break
    count <- count + 1
}
count
1
Trung Anh Phạm 27 ago. 2020 a las 06:36