R使用while循环查找时间步数

Question

我需要找到我的等式运行多少次，直到人口灭绝（N = 0）。我很确定这不会发生，因为我使用了几何增长方程式。

lambda=0.8
TimeSteps=10

# From previous example 
t=-c(1:TimeSteps)
N=-numeric()
N0=10
N[1]=N0
for(t in 1:TimeSteps) {
   N[t+1]=(N[t]*lambda)
}

我试图说明时间步长将等于N小于或等于零的x值。