year = [2000	2010	2020	2030];//years for the data
data = [8.18	21.54	49.68	62.56;//data for industry
      10.61	15.73	24.56	39.45;//data for Transport
      15.61	16.17	18.45	24.84;//data for Household
        1.72	2.3	3.13	4.28//data for services
    ];
data2 = data';//transpose of data
sectors = ["Industry"    "Transport"    "Household"    "Services"];
bar(year,data2,"stacked");
xtitle("","","Energy Demand,mtoe");
legend(sectors,"in_upper_left");