R - Перейти к следующему шагу в цикле, когда ошибка

Question

Я запускаю симуляции в R, в для. На каждом шаге цикла, я пытаюсь соответствовать бета-биномиальное распределение с использованием vglm функцию VGAM пакета:

vglm(data ~ 1, betabinomial) 

Однако для некоторых из моих сгенерированных данных, бета-биномиальной модели будет не подходит и функция сработает. Поскольку он выходит из строя, R выходит из цикла и останавливается. Я хотел бы просто перейти к следующему шагу в цикле. Я знаю о функции tryCatch, но не смог использовать ее в моем случае. На данный момент мой код выглядит следующим образом (обратите внимание, что для цикл вложен в другой для цикла):

for (i in 1:nsimu) { 
    ## Some code to generate Pos and Neg 
    data <- cbind(Pos,Neg) 
    if (sum(Pos)==0) { 
     ##Go to next step 
    } 
    else { 
     vglm(data ~ 1, betabinomial) 
    } 
} 

Большое спасибо за любую помощь или предложения.

Stéphane

Answer 1

Вы можете использовать next, чтобы пропустить шаг в for цикле:

R> for (i in 1:5) { if (i==2) next(); print(i)} 
[1] 1 
[1] 3 
[1] 4 
[1] 5 

Answer 2

Почему вы не сделать

if (sum(Pos) > 0) 
    vglm(data ~ 1, betabinomial) 

Конструктивно R работает только код на следующей новой строке, если условие оценивается TRUE. Всегда лучше использовать фигурные скобки {} обернуть выражение, чтобы избежать двусмысленности, хотя, и вы можете добавить else условие, чтобы оценить некоторые другие выражения, если Pos==0

if (sum(Pos) > 0){ 
    vglm(data ~ 1, betabinomial) 
} else { 
    do something else 
}