R 将列条目转换为具有条目的计数的列标题

我有一个由13893行组成的两列数据集，如下所示：

trip    species
120318  ADHJ
120918  FJIW
120918  ADHJ
180817  ADHJ
180817  FJIW
180817  FJIW
099217  ADHJ

trip    ADHJ    FJIW
120318  1       0
120918  1       1
180817  1       2
099217  1       0

我想更改它，使物种名称成为列标题，并计算每次旅行中每个物种的计数。结果如下：

trip    species
120318  ADHJ
120918  FJIW
120918  ADHJ
180817  ADHJ
180817  FJIW
180817  FJIW
099217  ADHJ

trip    ADHJ    FJIW
120318  1       0
120918  1       1
180817  1       2
099217  1       0

数据：

a%
组别（行程、种类）%>%
计数（）%>%
扩散（物种，n，填充=0）
##tibble:4 x 3
##团体：旅行[4]
#捷普ADHJ FJIW酒店
#      
# 1  99217     1     0
# 2 120318     1     0
# 3 120918     1     1
# 4 180817     1     2

数据表

库（data.table）
aDT Good old
Reformae2
可以在一行中完成此操作
Reformae2:：dcast（数据集，行程~物种，长度）
。某处应该有一个复制品。