Loops 对另一个向量重复一个循环

首先，我有一个100个值的向量m1。接下来，当下列函数Px+1=Pxlambda/x+1^nu之和或函数的cdf超过m1的第一个值时，它应该给我这个x值。同样，这个循环应该为m1的第二个值运行，以此类推。最终它应该给我100个数字。但是循环在第一个循环之后停止。我尝试了以下代码

critval=m1 
y=rep(NA,100) 
acumulated.distrib= function(sample,lambda,nu){ 
    p0=c0=0.017533668 
    for(i in 1:length(sample)){
        p <- p0*(lambda/(sample[i]+1)^nu) 
        c<- p+c0 
        c0=c 
        p0=p 
        for( t in 1:length(m1)){ 
            critval[t]=m1[t] 
            if (c > critval[t]){ 
                break 
            } 
        }  
    }  
    y[t]=sample[i] 
    print(sample[i]) 
} 
sample = seq(0,100,by=1) 
acumulated.distrib(sample,3,0.7)

---

如果有人能给我一些关于这个问题的想法或建议，这将对我很有帮助

我不知道它是什么语言，但可能在这个句子中，break语句不仅打破了内部循环，还打破了它所处的所有循环？你可能想用一种相关的语言来标记你的问题。[R] 也许吧？是的，这是R语言，谢谢你的重播。