r - 拆分矩阵列中的字符串并计算新向量中的单个元素

Question

我有一个像这样的数据集，来自使用 read.table() 读入 R 的文件:

Nr Result1
 1 "A203,A305,A409,B309,B424,B545"
 2 "A190,A203,A305,B309,B425,B545"
 3 "A203,A305,A410,B280,B309,B425,B545"

Result1 是一个字符串，我想在“，”处拆分它以计算每行中每个元素的出现次数。我想计算不同的元素并以这种格式写出结果:

A190 A203 A305 A409 A410 B280 B309 B424 B425 B545
1    3    3    1    1    1    3    1    2    3

我的第一个想法是遍历每一行，将字符串拆分为单个元素，使用第一组元素创建一个向量，对于第二行，检查匹配元素是否已经存在 (count+1) 或附加未知元素以 count=1 作为向量。

我对 R 很陌生，希望能提供一些示例代码或提示如何使用 R 函数实现单个步骤!非常感谢

Answer 1

我想这就是你要找的:

newvector <- table(unlist(strsplit(as.character(df$Result1), ",")))

结果(存储在newvector中):

#>newvector
#A190 A203 A305 A409 A410 B280 B309 B424 B425 B545 
#   1    3    3    1    1    1    3    1    2    3 

strsplit 函数在每个逗号处拆分字符串向量 (Result1)。结果是 data.frame 每一行的列表(在我的示例中为 df)。要将此列表转换为向量，请使用 unlist。 table 函数然后创建一个包含频率的表。