使用Tidyr＆＃34;分离＆＃34;分隔字符串。进入多列，然后使用计数创建新列

Question

所以我有下面的基本数据框，其中包含用逗号分隔的长字符串。我使用了Tidyr＆＃34; s＆＃34;分离＆＃34;创建新列。

如何添加另一个新列，其中包含每个包含答案的人的新列数？ （没有NA＆＃39; s）。

我想通过计算用逗号分隔的字符串元素数量，可以在分隔后或之前对列进行计数？

任何帮助将不胜感激。我想留在Tidyverse和dplyr。

Name<-c("John","Chris","Andy") 

Goal<-c("Go back to school,Learn to drive,Learn to cook","Go back to school,Get a job,Learn a new Skill,Learn to cook","Learn to drive,Learn to Cook")

df<-data_frame(Name,Goal)

df<-df%>%separate(Goal,c("Goal1","Goal2","Goal3","Goal4"),sep=",")

Answer 1

我们可以尝试return $q.reject(rejection);

str_count