我有Id | Flag
----+------
200 | 0
201 | 1
202 | 1
204 | 1
列，其中有几行调查受访者。 reasons中的响应用逗号隔开，因此列reasons中的一个单元格将显示为 reason1，reason2，reason3 。我想计算包含reason1（是否列出了唯一原因）的条目。到目前为止，我已经做到了
reasons仅 会返回列出了reason1的调查受访者，而不返回那些可能列出了reason1和其他原因的受访者。
hair1 = read_excel('hair1.xlsx')
reason1 = data.frame(subset(hair1, reasons=='reason1'))
结构（列表（原因= c（“原因1，原因2，原因3”，“原因1，原因2”）