add fixed values for Y axis on R script = 15000 pop