PairedBarChart "Education and Training pay..."
- To: mathgroup at smc.vnet.net
- Subject: [mg123915] PairedBarChart "Education and Training pay..."
- From: Gilmar Rodriguez-pierluissi <peacenova at yahoo.com>
- Date: Fri, 30 Dec 2011 07:04:57 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Reply-to: Gilmar Rodriguez-pierluissi <peacenova at yahoo.com>
Dear MathGroup: I'm attempting to build a chart similar to the one appearing on the following web page: http://www.bls.gov/emp/ep_chart_001.htm The following is what I have done far: doctoralrate = {0, 1.9}; doctoralearning = {0, 80600}; profdegreerate = {0, 2.4}; profdegreeearning = {0, 83720}; masterdegreerate = {0, 4.0}; masterdegreeearning = {0, 66144}; bachelordegreerate = {0, 5.4}; bachelordegreeearning = {0, 53976}; associatedegreerate = {0, 7.0}; associatedegreeearning = {0,39884}; somecollegerate = {0, 9.2}; somecollegeearning = {0, 37024}; highschoolgradrate = {0, 10.3}; highschoolearning = {0, 32552}; somehighschoolrate = {0, 14.9}; somehighschoolearning = {0, 23088}; labels = {"Some high school, no diploma", "high school graduate", "Some college, no degree", "Associate degree", "Bachelor's degree", "Master's degree", "Professional degree", "Doctoral degree"}; labelsrates = {"1.9 %", "2.4 %", "4.0 %", "5.4 %", "7.0 %", "9.2 %", "10.3 %", "14.9 %"}; labelsearnings = {"$80,600", "$83,720", "$66,144", "$53,976", "$39,884", "$37,024", "$32,552", "$23,088"}; scalingfactorrate = 5000; PairedBarChart[ Reverse[scalingfactorrate {doctoralrate, profdegreerate, masterdegreerate, bachelordegreerate, associatedegreerate, somecollegerate, highschoolgradrate, somehighschoolrate}], Reverse[{doctoralearning, profdegreeearning, masterdegreeearning, bachelordegreeearning, associatedegreeearning, somecollegeearning, highschoolearning, somehighschoolearning}], ChartLayout -> "Stacked", ChartStyle -> "Rainbow", BarSpacing -> Large, ChartLabels -> {Placed[{"Unemployment Rate in 2010 (%)", "Median Earnings in 2010 ($)"}, Above], Placed[labels, "CenterAxis"], None}, AxesLabel -> "Education", ImageSize -> Large, PlotLabel -> "Education and Training pay...", ChartElementFunction -> "GlassRectangle", Axes -> {False, True}] I'm having difficulties inserting the labelsrates, outside and to the left of the Unemployment rate bars. Similarly; I want to insert the labelsearnings, outside and to the right of the Median Earnings bars. I'm also having difficulties separating the two vertical axes so that, the education level labels fit properly between the axes. Thank you for your help! Gilmar Rodríguez Pierluissi