This problem was solved using this coding.
Using the package lattice:
xticks=c(0.0, 0.043, 0.052, 0.173, 0.178, 0.200, 0.360, 0.0, 0.1, 0.2, 0.3, 0.4, 0.5)
yticks=c(0, 5, 10, 15)
densityplot(~Wart,group=Species, data=datum, xlab="Wart to spot ratio", ylab="Frequency", scales=list(x=list(at=xticks), y=list(at=yticks)))
Unless you have some reason why you need lattice, you can make density plots also with the base graphics, and then
axis()
will work:Update:
Here's with three distributions: