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

Question

我有一列包含以下行：

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 = "\|" 拆分字符串，但它不起作用。

还有其他想法吗？

此致，

输出：

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"
)

Answer 1

您可以这样使用 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","")
)

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

Creating new categories from a text string in R

r

categories

stringr