Почему ошибка plot.window () продолжает возникать в R?

Question

этот код R работает для построения моих значений

density = sim@n[150,,] - simnormal@n[150,,]
plot(x=simnormal@params@w, y=abs(density), log="xy", type="n", xlab = "Size (g)", ylab="Biomass Density")
lines(x=simnormal@params@w, y=abs(density))

Я хочу создать цикл для повторного построения графика на каждом временном шаге, у меня есть

for (i in 1:150){
    density = sim@n[i,,] - simnormal@n[i,,]
    plot(x=simnormal@params@w, y=abs(density), log="xy", type="n", xlab = "Size (g)", ylab="Biomass Density")
    lines(x=simnormal@params@w, y=abs(density))
    Sys.sleep(0.5)
    }

Однако возникает эта ошибка

Error in plot.window(...) : need finite 'ylim' values
In addition: Warning messages:
1: In xy.coords(x, y, xlabel, ylabel, log) : 100 y values <= 0 omitted from logarithmic plot
2: In min(x) : no non-missing arguments to min; returning Inf
3: In max(x) : no non-missing arguments to max; returning -Inf

Почему это происходит?

Любая помощь будет высоко ценится!

Бен.