否则If语句

Question

我正在R中运行以下内容：

if (mito$count > 1) {
mito$Polymorphism  <- "SNP"
} else if ((mito$count == 1) & (mito$A_GT == mito$ref | mito$C_GT == mito$ref | mito$G_GT == mito$ref | mito$T_GT == mito$ref)) {
mito$Polymorphism  <- "No"
} else {
    mito$Polymorphism <- ""
}

这让我犯了每个人似乎都会犯的错误：

1: In if (mito$count > 1) { :
the condition has length > 1 and only the first element will be used
2: In if ((mito$count == 1) & (mito$A_GT == mito$ref | mito$C_GT ==  :
the condition has length > 1 and only the first element will be used

我假设这与单个值与向量有关(前者，我想这样做)。我是否需要事先指定数据框架？

Answer 1

ifelse()就是在这种情况下工作的：

mito$Polymorphism <- ifelse(mito$count > 1, 
                            'SNP', 
                            ifelse(((mito$count == 1) & 
                                    (mito$A_GT == mito$ref |
                                     mito$C_GT == mito$ref |
                                     mito$G_GT == mito$ref |
                                     mito$T_GT == mito$ref)),
                                   'NO',
                                   ''))