R 语言data.frame 中的另一行中减去一行

我有一个相当大的文件data.frame，它显示了对一系列树种的两种处理（加上一个对照）的数据分析结果。我希望能够创建一个新data.frame的来显示每个物种的对照和每种处理之间的差异。

这是一些虚拟数据来显示我正在尝试做的事情

dat <- data.frame(species = rep (c("Oak", "Elm", "Ash"), each = 3