r语言 - 数据帧的一列中存在的 sum 元素 - >在数据帧中创建新列

Question

我有一个这种类型的数据帧(2行2列(：

ID  Molecules  
1   AA, BB, CC  
2   FF, DD

我想在R中产生一个新的柱，对应于"；分子；列：

ID  Molecules    Number  
1   AA, BB, CC   3  
2   FF, DD       2  

Answer 1

几种方法-

1. 计算数据中的逗号数，然后加1

df$Number <- stringr::str_count(df$Molecules, ',') + 1
df
#  ID  Molecules Number
#1  1 AA, BB, CC      3
#2  2     FF, DD      2

2. 以逗号分隔数据并计算长度

df$Number <- lengths(strsplit(df$Molecules, ','))

数据

df <- structure(list(ID = 1:2, Molecules = c("AA, BB, CC", "FF, DD"
)), class = "data.frame", row.names = c(NA, -2L))