R语言：如何在if语句中匹配任意整数以筛选DataFrame行

原代码问题点 #

1. 循环范围错误：1:df$V1是取列V1的值作为范围，正确应该是遍历行号1:nrow(df)，且要避免最后一行取下一行报错，所以循环到nrow(df)-1
2. 条件匹配错误：没有用正则处理任意整数，需要用grepl结合正则表达式匹配>MPM开头加任意数字的行
3. 向量赋值错误：&&是逻辑运算符，不能用来同时给两个向量赋值，应该用c()函数追加元素

修正后的代码 #

首先初始化空向量：

Name_vector <- c()
Sequence_vector <- c()

然后执行循环筛选：

for(i in 1:(nrow(df)-1)){
  # 匹配以'>MPM'开头、后续为任意整数的行
  if(grepl("^>MPM\\d+$", df$V1[i])){
    Name_vector <- c(Name_vector, df$V1[i])
    Sequence_vector <- c(Sequence_vector, df$V1[i+1])
  }
}

核心细节解释 #

• 正则表达式^>MPM\\d+$：
  • ^ 锁定字符串开头，确保是从>MPM开始
  • \\d+ 匹配1个或多个数字（对应需求中的xx任意整数）
  • $ 锁定字符串结尾（如果行内容在>MPMxx之后还有其他字符，可去掉$放宽匹配）
• 循环范围1:(nrow(df)-1)：防止i+1超出DataFrame的最大行号，避免索引报错
• 用c()追加向量元素：这是R中向向量添加元素的标准方式，每次循环把符合条件的内容加到向量末尾

内容的提问来源于stack exchange，提问作者Nagdhani