Re: st: Margins not aligned for stacked hbar grc1leg

[kavita sardana <kavita.sardana@teriuniversity.ac.in>]

Thanks Nick

Graphs are not produced separately, they are produced as one graph.
However, the last graph(a2.gph) is not aligned with the other 5
graphs(a.gph, a1a.gph, a1b.gph, a1c.gph, a1d.gph) on the left margin.

Other than that it the program is running fine.

On Thu, Mar 14, 2013 at 7:24 PM, Nick Cox <njcoxstata@gmail.com> wrote:
> Comments on various levels:
>
> 1. This won't run without a fix: the last category of -q- is defined
> as "above 65" but the last separate graph is for "above65" and there
> are no such observations. That is, a space should be inserted to fix.
>
> 2. -grc1leg- is not explained as being user-written, and as downloaded
> from where, and the code won't run unless it is installed.
>
> 3. I don't see why the graphs are being produced separately when they
> can be produced as one. You just need -over(q)- and not to restrict
> graphs to each age category.
>
> 4. However, stacking and showing the numerical values just doesn't
> work well here when several of your percents are zero or otherwise
> very small. There just isn't enough space to put the values for small
> percents anywhere!
>
> 5. I suggest something different, in essence a table of bars. My
> -tabplot- (SSC) is one possibility, but here's an approach with
> official commands.
>
> First, you need a different data structure.
>
> reshape long a, i(q) j(answer)
> label def answer 1 "No Change" 2 "Better" 3 "Worse" 4 "No direct
> experience" 5 "Don't know"
> label val answer answer
> encode q, gen(age)
> gen a2 = round(a,1)
>
> Then I produce a table of bars.
>
> twoway bar a age, horizontal by(answer, row(1) compact legend(off)
> note(""))  barw(0.7) ///
> ysc(reverse) xla(none) xsc(r(. 80)) yla(1/6, nogrid valuelabel ang(h)
> tlength(0)) ytitle("") ///
> || scatter age a, ms(none) mla(a2) xtitle("")
>
> Suggestions here:
>
> If you show the numbers, you don't need the numerical scale too.
>
> If you show the numbers, you don't need 2 decimal places.  Round first.
>
> I've not disturbed your ordering, beyond correcting punctuation, but
> I'd guess that "No change" belongs between "Better" and "Worse".
>
> You need the Graph Editor too to edit "No direct experience" to two lines.
>
> There's more in the same vein at
>
> SJ-8-2  gr0034  . . . . . . . . . .  Speaking Stata: Between tables and graphs
>         (help labmask, seqvar if installed) . . . . . . . . . . . .  N. J. Cox
>         Q2/08   SJ 8(2):269--289
>         outlines techniques for producing table-like graphs
>
> and a .pdf is accessible at
> http://www.stata-journal.com/sjpdf.html?articlenum=gr0034
>
> Nick
>
> On Thu, Mar 14, 2013 at 8:46 AM, kavita sardana
> <kavita.sardana@teriuniversity.ac.in> wrote:
>> I am combining 5 stacked hbar graphs. For the last hbar graph, for age
>> group "above 65", margins are not aligned. Will appreciate any help on
>> this.
>>
>>
>> clear all
>>
>> input str25 q a1 a2 a3 a4 a5
>>
>> "18-24" 14.29 52.63 26.32 6.77 0.00
>>
>> "25-34" 9.04 65.96 23.40 1.60 0.00
>>
>> "35-44" 10.67 54.49 33.15 0.56 1.12
>>
>> "45-54" 9.01 67.57 22.52 0.90 0.00
>>
>> "55-64" 10.29 61.76 23.53 4.41 0.00
>>
>> "above 65" 0.00 69.23 30.77 0.00 0.00
>>
>> end
>>
>> graph hbar a1-a5 if q=="18-24", percent over(q, label (labsize(tiny))
>> gap(20)) blabel(bar, format(%3.2f) position(center)) ytitle("Age") ///
>>
>> stack legend(off) yscale(off) yline(20 40 60 80 ,lwidth(0.25) lcolor(black)) ///
>>
>> saving(a1, replace)yscale(off) plotregion(margin( b+1 t+1)) outergap(50)
>>
>>
>>
>> graph hbar a1-a5 if q=="25-34", percent over(q, label (labsize(tiny))
>> gap(20)) blabel(bar, format(%3.2f) position(center)) ytitle("Age") ///
>>
>> stack legend(off) yscale(off) yline(20 40 60 80 ,lwidth(0.25)lcolor(black)) ///
>>
>> saving(a1a, replace)yscale(off) plotregion(margin( b+1 t+1)) outergap(50)
>>
>>
>>
>> graph hbar a1-a5 if q=="35-44", percent over(q, label (labsize(tiny))
>> gap(20)) blabel(bar, format(%3.2f) position(center)) ytitle("Age") ///
>>
>> stack legend(off) yscale(off) yline(20 40 60 80 ,lwidth(0.25) lcolor(black)) ///
>>
>> saving(a1b, replace)yscale(off) plotregion(margin( b+1 t+1)) outergap(50)
>>
>>
>>
>> graph hbar a1-a5 if q=="45-54", percent over(q, label (labsize(tiny))
>> gap(20)) blabel(bar, format(%3.2f) position(center)) ytitle("Age") ///
>>
>> stack legend(off) yscale(off) yline(20 40 60 80 ,lwidth(0.25)lcolor(black)) ///
>>
>> saving(a1c, replace)yscale(off) plotregion(margin( b+1 t+1)) outergap(50)
>>
>>
>>
>> graph hbar a1-a5 if q=="55-64", percent over(q, label (labsize(tiny))
>> gap(20)) blabel(bar, format(%3.2f) position(center)) ytitle("Age") ///
>>
>> stack legend(off) yscale(off) yline(20 40 60 80 ,lwidth(0.25) lcolor(black)) ///
>>
>> saving(a1d, replace)yscale(off) plotregion(margin( b+1 t+1)) outergap(50)
>>
>>
>>
>> graph hbar a1-a5 if q=="above65", percent over(q,label (labsize(tiny))
>> gap(40)) blabel(bar, format(%3.2f) position(center)) ytitle("Age") ///
>>
>> stack legend(span rows(1) label(1 "No Change") label(2 "Better") ///
>>
>> label(3 "Worse") label(4 "No direct experience") label(5 "Dont know") ///
>>
>> size(tiny)) ///
>>
>> yline(20 40 60 80 ,lwidth(0.25 ) lcolor(black)) saving(a2, replace)
>>
>> grc1leg a1.gph a1a.gph a1b.gph a1c.gph a1d.gph a2.gph, cols(1) ///
>>
>> imargin(0 0 0 0) xcommon legendfrom(a2.gph)
>>
> *
> *   For searches and help try:
> *   http://www.stata.com/help.cgi?search
> *   http://www.stata.com/support/faqs/resources/statalist-faq/
> *   http://www.ats.ucla.edu/stat/stata/



-- 
Kavita Sardana
Ph.D. University of Georgia
Assistant Professor
Department of Policy Studies
TERI University
10, Institutional Area
Vasant Kunj
New Delhi-70
India
Tel. +91 11 26122222, 26139110, 26139011
Ph:
*
*   For searches and help try:
*   http://www.stata.com/help.cgi?search
*   http://www.stata.com/support/faqs/resources/statalist-faq/
*   http://www.ats.ucla.edu/stat/stata/