文章/答案/技术大牛

发布

社区首页 >问答首页 >从R中的文本字符串创建新类别

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

Stack Overflow用户

提问于 2017-04-21 16:02:12

回答 1查看 60关注 0票数 0

我有一个列，列有以下行：

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:XXX，NET:XXX，字符串的部分需要被忽略。

完整的投资组合可以是这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"
)

回答 1

Stack Overflow用户

回答已采纳

发布于 2017-04-21 16:21:55

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

票数 1

页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持

原文链接：

https://stackoverflow.com/questions/43547223

复制

相似问题

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

回答 1

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

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

回答 1

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

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