Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/maven/5.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R：计数并转换为数字_R_Count - Fatal编程技术网
Fatal编程技术网
  • r/
  • R：计数并转换为数字

R：计数并转换为数字

r

R：计数并转换为数字,r,count,R,Count,我有一个以下格式的数据帧 A B xxx 100;2;30;5 yyy 30;5 zzz 35 如何计算第二列B列中的数字数并转换为如下计数： A B xxx 4 yyy 2 zzz 1 谢谢。假设您的数据位于名为data的data.frame中，strsplit和sapply的组合可以很快解决这个问题 Data$C <- sapply(strsplit(Data$B, ";"), length) Data$C这样做的诀窍如下： dfr$B<-nchar(as

我有一个以下格式的数据帧

A    B
xxx 100;2;30;5
yyy 30;5
zzz 35
如何计算第二列B列中的数字数并转换为如下计数：

A    B
xxx  4
yyy  2
zzz  1
谢谢。

假设您的数据位于名为
data
的
data.frame
中，
strsplit
和
sapply
的组合可以很快解决这个问题

Data$C <- sapply(strsplit(Data$B, ";"), length)

Data$C这样做的诀窍如下：


dfr$B<-nchar(as.character(dfr$B))-nchar(gsub(";","",dfr$B))+1



dfr$B

dfr$B<-nchar(as.character(dfr$B))-nchar(gsub(";","",dfr$B, fixed=TRUE))+1