library(tidyverse)
andmed=read_csv("http://minitorn.tlu.ee/~jaagup/kool/java/kursused/18/kvantdh/naited/02/filmimuusika.txt")
head(andmed)
ggplot(andmed, aes(production_year, kogus)) + geom_point()