Here is the data:
Top Country:
Country, Happiness_rank, Happiness_score, Year
Finland, 1, 7.769, 2019
Denmark, 2, 7.6, 2019
Norway, 3, 7.554, 2019
Iceland, 4, 7.494, 2019
Netherlands, 5, 7.488, 2019
Finland, 2, 7.369, 2018
Denmark, 3, 7.4, 2018
Norway, 1, 7.254, 2018
Iceland, 6, 7.394, 2018
Netherlands, 5, 7.188, 2018
Finland, 1, 7.369, 2017
Denmark, 4, 7.4, 2017
Norway, 1, 7.254, 2017
Iceland, 3, 7.394, 2017
Netherlands, 5, 7.188, 2017
Bottom 5:
Country, Happiness_rank, Happiness_score, Year
South Sudan, 156, 2.853, 2019
Central Africa, 155, 3.083, 2019
Afghanistan, 154, 3.203, 2019
Tanzania, 153, 3.231, 2019
Rwanda, 152, 3.334, 2019
South Sudan, 156, 2.653, 2018
Central Africa, 155, 3.183, 2018
Afghanistan, 154, 3.223, 2018
Tanzania, 153, 3.261, 2018
Rwanda, 152, 3.364, 2018
South Sudan, 156, 2.753, 2017
Central Africa, 155, 3.183, 2017
Afghanistan, 154, 3.293, 2017
Tanzania, 153, 3.331, 2017
Rwanda, 152, 3.344, 2017
Australia
Country, Happiness_rank, Happiness_score, Year
Australia, 11, 7.228, 2019
Australia, 10, 7.128, 2018
Australia, 12, 7.628, 2017
data have;
set combined;
if Happiness_score <=7.488 then group=top;
else if Happiness_score >=3.334 then group=bottom;
else group=Australia;
run;
title 'Changes in happiness score by group (top and bottom) over time including Australia';
proc sgplot data=combined;
series x=year y=Happiness_score /group = Hapiness_score;
yaxis grid minor minorgrid min=0;
xaxis label='Year';
run;
Looking for your kind response