[数据整理]：在字符串中筛选目标字符

在Excel中经常需要整理犹如下图类型数据。

要将材料列（字符串）中的内容分别查找到相应名称列（目标字符）中，可以采用以下R语言代码：

#导入数据
library(readxl)
mydata <- read_excel("案例数据.xlsx")
View(mydata)

#用grepl函数实现
#格式：grepl("目标字符","字符串变量")
#mydata$锤子<- grepl("锤子",mydata$材料)
#用as.numeric()函数将grepl生成的逻辑向量转换成0、1形式。
mydata$锤子<- as.numeric(grepl("锤子",mydata$材料))
mydata$钉子<- as.numeric(grepl("钉子",mydata$材料))
mydata$螺帽<- as.numeric(grepl("螺帽",mydata$材料))

View(mydata)

write.csv(mydata,"整理后数据.csv")

输出的数据如下所示：

如需将0、1转化成目标字符，在Excel中替换一下即可。（在R中应该也可以实现，但是感觉Excel弄一下也挺方便。）