问题呢。。。。是这样的。。。。

我有一个MAIN FUNCTION用来做SIMULATION，我尽量把问题简单化：

for (i in 1:100){
    set.seed(i)
    a <- main(i) }

main <- function (var)
{b <-0/(i-50)
return b }

但是很明显，当i=50的时候，b的值为nan。我想知道有没有办法可以做一个控制语句，使得b为nan的时候，则不要这一次的结果，而是进行到下一个i的运算中去。
btw，忘记说了，我的程序中，如果b出现nan，则程序下面会无法运行下去，而出现错误提示。所以最好是在main里面加语句(比如，if is.nan(b) 则重新call main function。。。好像听起来很不太可行。。。），而不是if is.nan(a) { i =i+1....}这样的

不知道我是不是解释清楚了。。。谢谢大家！！