st: using extended macros to title graphs

[David Souther <davidsoutheremail@gmail.com>]

the value in one string variable that corresponds to another variable.

So, a condensed version of my data looks like:

clear
inp str35 vars str25 varlabs participant_type1 participant_type2 indicator
"children_with_mental_illness_" "Children with MI" .4 .5 1
"communitywide_prevention_init" "Community-wide prevention" .2 .9 0
"differences_between_families_" "Conflict between families " .3 .2 0
"dysfunctional_or_broken_famil" "Dysfunctional " .47 .29 0
"greater_access_to_diversion_o" "Greater access " .2 .5 1
"greater_tolerance_and_cultura" "Greater tolerance " .6 .2 1
"high_levels_of_transience_and" "High levels " .5 .2 0
"holding_juvenile_offenders_mo" "Holding " .4 .4 0
"homeless_youth_face_special_c" "Homeless " .2 .4 0
"immigrant_youth_face_special_" "Immigrant " .2 .3 1
end


I want to graph participant_type(s) for specific conditions (one of
the "vars" in `tc' and indicator==1) while adding the corresponding
"varlabs" title, here's what I tried (and didn't work):


local tc  dysfunctional_or_broken_famil  greater_tolerance_and_cultura
 immigrant_youth_face_special_
foreach i in `tc' {
graph hbar (asis) participant_type1 participant_type2  if indicator==1
& "`i'"==vars,  ///
nofill   bargap(4.5) blabel(bar, size(medium) position(outside)
format(%4.2f))  ///
ytitle(%Responses) title("Causes   `=varlabs[`vars[`i']']'")  ///
legend(size(vsmall)) name(g1, replace)   ///
subtitle(, size(small) span bexpand) graphregion(margin(tiny))
plotregion(margin(vsmall))
*graph save g1 "g1.gph", replace
*graph export "causes_`i'_participanttype.pdf", as(pdf) replace name(g1)
}

Thanks for any insights,  D.S.
*
*   For searches and help try:
*   http://www.stata.com/help.cgi?search
*   http://www.stata.com/support/statalist/faq
*   http://www.ats.ucla.edu/stat/stata/