R中的条件和，包括其他列的字符串响应

Question

我想从以下数据集中找到驾驶本田汽车的银行家的受访者总数:

tbody> <<tr>丰田本田现代

Type	EmployHistory
本田	银行家,分析师,学生
	政府、银行家
	银行家
	学生

trydata.tablepackage

library(data.table)
dt <- CarPurchases |> as.data.table() ## convert to table
dt[Type == 'Honda' & grepl("Banker", x = EmployHistory) ,.N,]