您没有提供任何数据,因此我们无法准确响应,但是我将用其他数据进行说明,然后说出我认为您需要的内容。使用内置的虹膜数据:
Tab = aggregate(iris$Sepal.Length, list(iris$Species), mean)
barplot(Tab$x, names.arg=Tab$Group.1)
所以您可能需要类似的东西:
Tab = aggregate(DAT$parasites, list(DAT$SEX), mean)
barplot(Tab$x, names.arg=Tab$Group.1)