Ошибка: C использование стека 15925344 слишком близко к пределу при запуске построения выборки в R

Question

Я запустил простой код выборки в r и получил ошибку: Ошибка: C Использование стека 15925344 слишком близко к пределу Я пробую несколько методов в сети, чтобы исправить это, но не удается. Я думаю, что это просто исправить, но не знаю, как. Любая помощь будет оценена.

set.seed(1)

sam<-rnorm(1000,m,s)

mean(sam)

summary(replicate(100,mean(rnorm(1000,m,s))))

cumean<-function(x) cumean(x) / seq_along(x)

plot(cumean(sam), type="l", xlab="Sample", ylab="Cumulative mean",
     panel.first=abline(h=0, col="red"), las=1,axes = F)

Answer 1

Вы используете cumean() в определении cumean().

Вместо этого вы захотите использовать cumsum():

set.seed(1)

sam<-rnorm(1000)

mean(sam)

summary(replicate(100,mean(rnorm(1000))))

cumean<-function(x) cumsum(x) / seq_along(x)

plot(cumean(sam), type="l", xlab="Sample", ylab="Cumulative mean",
     panel.first=abline(h=0, col="red"), las=1,axes = F)

Обратите внимание, что я исключил ссылки на m и s, поскольку у нас нет доступа к этим значениям (см. Как создать минимальный воспроизводимый пример ); это означает, что приведенный выше код использует значения по умолчанию 0 и 1 соответственно.