使用apply和regexpr向数据帧添加多列

new_df <- data.frame()

apply(df, 1, function(row) {
  # 在这里编写正则表达式的逻辑
})

apply(df, 1, function(row) {
  # 使用regexpr函数匹配特定列的值
  result <- regexpr(pattern, row[column_index])
})

apply(df, 1, function(row) {
  # 使用regexpr函数匹配特定列的值
  result <- regexpr(pattern, row[column_index])
  
  # 将匹配结果添加到新的数据帧中
  new_df <- rbind(new_df, cbind(row, new_column=result))
})

new_df