Re: st: Margins not aligned for stacked hbar grc1leg

[Nick Cox <njcoxstata@gmail.com>]

Something like this shows the principle

graph hbar (asis) a1-a5, over(q) stack blabel(bar, format(%3.2f)
position(center)) legend(off)

You wanted something more complicated, but that's just details.

Nick

On Thu, Mar 14, 2013 at 3:46 PM, Nick Cox <njcoxstata@gmail.com> wrote:
> I am puzzled by these comments.
>
> You produced 6 graphs and then combined them with -grc1leg- (Vince
> Wiggins). That's what I meant by producing graphs separately. You can
> get what you seemed to want with one command and without using
> -grc1leg-.
>
> (Also, although you did not ask this, it's my view that you can get a
> much cleaner and more effective graph with a different approach.)
>
> Nick
>
> On Thu, Mar 14, 2013 at 3:40 PM, kavita sardana
> <kavita.sardana@teriuniversity.ac.in> wrote:
>> 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/