/*you should download the data and do.file in the same fold*/ use Likert_scale.dta, clear two (dropline percent idd if question==1) /// (dropline percent idd if question==2) /// (dropline percent idd if question==3) /// (dropline percent idd if question==4) /// (dropline percent idd if question==5) /// (dropline percent idd if question==6) /// (dropline percent idd if question==7) /// , name(tp1, replace) /// xlab(1.5 "Strongly disagree" 3.6 "disagree" 5.6 "neirther/nor" 7.6 "Agree" 9.6 "Stongly agree", labsize(small)) /// xscale(r(0.5 11)) xtitle("") ytitle("Percent (%)") /// legend(row(1) size(vsmall) lab(1 "Question 1 (Q1)") lab(2 "Q2") lab(3 "Q3") lab(4 "Q4") lab(5 "Q5") lab(6 "Q6") lab(7 "Q7") symxsize(*.3) ) /// title("Summary for seven questions with Likert scale from survey data", size(medium)) xtitle("")