正则表达式 – 将变量传递给R中的正则表达式的替代方法是什么？

发布时间：2020-12-14 05:49:49 所属栏目：百科来源：网络整理

导读：我的一段代码,用于删除short某些文字中的长词是： # Remove Words based on lowerCutOff upperCutOffremoveByLength- function(text,lowerCutOff=2,upperCutOff=12){ text- gsub("b[a-zA-Z0-9]{1,lowerCutOff}b|b[a-zA-Z0-9]{upperCutOff,}b"," ",te

我的一段代码,用于删除short&某些文字中的长词是：

# Remove Words based on lowerCutOff & upperCutOff
removeByLength<- function(text,lowerCutOff=2,upperCutOff=12){
  text<- gsub("b[a-zA-Z0-9]{1,lowerCutOff}b|b[a-zA-Z0-9]{upperCutOff,}b"," ",text)
  return(text)
}

如何在不对较低和较低的硬盘进行硬编码的情况下实现所需的功能.上截止点？

解决方法

使用paste来连接字符串以创建模式：

removeByLength<- function(text,upperCutOff=12){
  pattern <- paste("b[a-zA-Z0-9]{1,",lowerCutOff,"}b|b[a-zA-Z0-9]{",upperCutOff,sep="")
  text <- gsub(pattern,text)
  return(text)
}

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!