Dear Serge,<br><br>Thank you so much for your suggestions.<br><br>It has worked very well.<br><br>I am very gratefull for the insight.<br><br>Enibe<br><br><div class="gmail_quote">On Fri, Sep 28, 2012 at 2:28 PM, Serge Steer <span dir="ltr"><<a href="mailto:Serge.Steer@inria.fr" target="_blank">Serge.Steer@inria.fr</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Le 28/09/2012 11:22, Samuel Enibe a écrit :<div class="im"><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
year = [2000 2010    2020    2030];//years for the data<br>
data = [8.18    21.54    49.68    62.56;//data for industry<br>
      10.61    15.73    24.56    39.45;//data for Transport<br>
      15.61    16.17    18.45    24.84;//data for Household<br>
        1.72    2.3    3.13    4.28//data for services<br>
    ];<br>
data2 = data';//transpose of data<br>
sectors = ["Industry"    "Transport"    "Household" "Services"];<br>
bar(year,data2,"stacked");<br>
xtitle("","","Energy Demand,mtoe");<br>
legend(sectors,"in_upper_left"<u></u>);<br>
</blockquote>
<br></div>
Here is a solution<div class="im"><br>
<br>
year = [2000    2010    2020    2030];//years for the data<br>
data = [8.18    21.54    49.68    62.56;//data for industry<br>
      10.61    15.73    24.56    39.45;//data for Transport<br>
      15.61    16.17    18.45    24.84;//data for Household<br>
        1.72    2.3    3.13    4.28//data for services<br>
    ];<br>
data2 = data';//transpose of data<br>
sectors = ["Industry"    "Transport"    "Household"    "Services"];<br></div>
clf;bar(year,data2,"stacked");<br>
ny=size(year,'*');<br>
cdata=cumsum([zeros(1,ny);<u></u>data(1:$-1,:)],1)+data/2;<br>
for j=1:ny //loop on years<br>
  for i=1:size(data,1) //loop on types<br>
    l=string(data(i,j));<br>
    r=xstringl(0,0,l);<br>
    xstring(year(j)-r(3)/2,cdata(<u></u>i,j)-r(4)/2,l);<br>
  end<br>
end<div class="HOEnZb"><div class="h5"><br>
xtitle("","","Energy Demand,mtoe");<br>
legend(sectors,"in_upper_left"<u></u>);<br>
<br>
<br></div></div><span class="HOEnZb"><font color="#888888">
Serge Steer<br>
INRIA<br>
______________________________<u></u>_________________<br>
users mailing list<br>
<a href="mailto:users@lists.scilab.org" target="_blank">users@lists.scilab.org</a><br>
<a href="http://lists.scilab.org/mailman/listinfo/users" target="_blank">http://lists.scilab.org/<u></u>mailman/listinfo/users</a><br>
</font></span></blockquote></div><br><br clear="all"><br>-<br>