Fatal编程技术网
  • r/
  • 从R中的文本字符串创建新类别

从R中的文本字符串创建新类别

r

从R中的文本字符串创建新类别,r,categories,stringr,R,Categories,Stringr,我有一个包含以下行的列： Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access Telephone line rental|Fixed broadband|Mobil

我有一个包含以下行的列：

Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access
Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access
Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access
Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access
Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access
Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access
Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access
Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access
Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: No home phone calls or line rental|NET: Internet access
我想根据找到的值创建一个新列：即

if Telephone line rental is found, then in the new column, I want to code as V
if Fixed broadband, then code as B
if Mobile phone = M
if Paid for TV service / TV and/or sport code as T
因此，如果我们以第一行为例：

Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access
类别将为：
V、B、M
需要忽略字符串的NET:XXX | NET:XXXX部分

完整的投资组合可以是这4个组合的任意组合，但它们必须按以下顺序排列
V、B、M、T

我一直在谷歌上搜索和阅读
library（stringr）

尝试使用
sep=“\\\\\；”
拆分字符串，但它不起作用

还有其他想法吗

问候,

DPUT:

c("Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: No home phone calls or line rental|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Mobile phone|Paid for TV service|NET: No home phone calls|NET: No home phone calls or line rental|NET: No internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Mobile phone|Paid for TV service|NET: No home phone calls|NET: No home phone calls or line rental|NET: No internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Mobile phone|Paid for TV service|NET: No home phone calls|NET: No home phone calls or line rental|NET: No internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: No home phone calls or line rental|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Fixed broadband|Mobile phone|NET: No home phone calls|NET: No home phone calls or line rental|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Mobile phone|NET: No home phone calls|NET: No internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: No home phone calls or line rental|NET: Internet access", 
"Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: No home phone calls or line rental|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Mobile phone|NET: No home phone calls|NET: No internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: No home phone calls or line rental|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Mobile phone|Paid for TV service|NET: No home phone calls|NET: No internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access", 
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access"
)
您可以这样使用
grepl
：

df <- read.table(text='"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access"
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access"
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access"
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access"
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access"
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access"
"Telephone line rental|Fixed broadband|Mobile phone|NET: No home phone calls|NET: Internet access"
"Telephone line rental|Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: Internet access"
"Fixed broadband|Mobile phone|Paid for TV service|NET: No home phone calls|NET: No home phone calls or line rental|NET: Internet access"',
header=FALSE,stringsAsFactors=FALSE)

tv <- c("Paid for TV service","TV","sport code")

df$new_col <- paste(ifelse(grepl("Telephone line rental",df$V1),"V",""),
ifelse(grepl("Fixed broadband",df$V1),"B",""),
ifelse(grepl("Mobile phone",df$V1),"M",""),
ifelse(grepl(paste(tv,collapse = "|"), df$V1),"T","")
)

df@d.b我已经添加了专栏dputworks，但电视类别不起作用：/@Shery我不确定电视的规则：这是三种可能性：付费电视服务/电视和/或体育代码？@Shery我修复了电视部分
grepl
在处理多个输入字符串时的工作方式稍有不同。@P Lapointe这很好地解决了这个问题。。。但它并没有固定新列的顺序，例如，如果电话线租赁
例如，我想添加另一个进程，将顺序从
bmvt
更改为
vmt
，因此新列的顺序并不重要……顺序应该总是像
vmt
@Shery，顺序会改变无论线路上的“电话线租赁”在哪里，始终使用VBMT。