Someone

src.csv:
carrots 38
snakes 109
umbrellas 66

> d <- read.table("src.csv")
> plot(d[,2], d[,1])