在R中，如何将以下两个项目的示例应用于项目列表？

Question

这是一般性的想法，在实践中，我希望能够为每个后续的if语句用任意数量的项目执行[alpha，beta，gamma ......等]列表。

if (v == n(r)[alpha]) {
    inc(c)
    v = sample(c(names(r)), 1, replace = FALSE, prob = p[alpha,])
    new = v
    if (new == n(r)[ori]) 
    {
        inc(c)
        dis = b+c
        av = c(av,dis)
    }

else if (v == names(r)[beta]) 
{
    inc(b)
    v = sample(c(n(r)), 1, replace = FALSE, prob = p[beta,])
    new = v
    if (new == n(r)[ori]) 
    {
        inc(b)
        dis = b+c
        av = c(av,dis)
    }  
    else if (v == names(r)[gamma] 
....