# строю два графика, раскрашивая линии в разные цвета; подписываю шкалы, даю название графику и перевожу всё чёрно белую тему
ggplot(pp, aes(x = pp$id)) +
geom_line(aes(y = pp$V1), color = "red") +
geom_line(aes(y = l), color = "green") +
xlab("Номер вида") +
ylab("Обилие вида") +
ggtitle("Распределение видов на пробной площадке") +
theme_bw()