<div dir="ltr"><div>Hi,</div><div>I had a quick question that I can't seem to get a handle on. I have an ACS object of about a 1000 block groups on table B15002 (Sex by Education). I'm attempting to sum columns (i.e. all the columns that indicate not finishing HS for both males and females) prior to dividing by the block group total. However, when I sum columns, I seem to lose my block group geography info and all the estimates are aggregated into a single number. Is there a way sum columns to be divided by the total but each geography?</div><div><br></div><div>Any suggestions would be most appreciated.</div><div><br></div><div><br></div><div><div>vars<-c('B15002001', #Total followed by Males vars then Female vars</div><div> 'B15002002', #Total Male</div><div> 'B15002003','B15002004','B15002005','B15002006','B15002007','B15002008','B15002009','B15002010','B15002011', #HS</div><div> 'B15002012','B15002013','B15002014','B15002015','B15002016','B15002017','B15002018', #College</div><div> 'B15002019', #Total Female</div><div> 'B15002020','B15002021','B15002022','B15002023','B15002024','B15002025','B15002026','B15002027','B15002028', #HS</div><div> 'B15002029','B15002030','B15002031','B15002032','B15002033','B15002034','B15002035') #College</div><div><br></div><div>vars<-paste(substr(vars, 1L, 6L), substr(vars, 7L, 9L), sep = '_')<br></div></div><div><br></div><div>block.data<-acs.fetch(endyear=2010,span=5,geo=emah.blocks,variable=vars)<br></div><div><br></div><div>cols.mf<-c(3:11,20:28)<br></div><div>HSpct.mf <- sum(block.data[,cols.mf])<br></div><div><br></div><div>Thanks so much,</div><div>Best,</div><div>Chris</div><br clear="all"><div><div class="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr" style="font-size:12.8px"><b style="font-size:12.8px"><span style="font-size:8pt;color:black"><font face="arial, helvetica, sans-serif">Chris Cambron, MSW, MPP</font></span></b></div><div><font face="arial, helvetica, sans-serif"><span style="color:black;font-size:8pt">Doctoral Student</span></font></div><div dir="ltr"><font face="arial, helvetica, sans-serif"><span style="color:black;font-size:8pt">Social Development Research Group</span></font></div><div dir="ltr"><span style="color:rgb(0,0,0);font-family:arial,helvetica,sans-serif;font-size:10.6667px">School of Social Work </span><span style="font-size:8pt;color:black"><font face="arial, helvetica, sans-serif"> </font></span><span style="color:rgb(0,0,0);font-family:arial,helvetica,sans-serif;font-size:10.6667px">| </span><span style="font-family:arial,helvetica,sans-serif;color:black;font-size:8pt">University of Washington</span></div><div dir="ltr"><span style="font-family:arial,helvetica,sans-serif;font-size:10pt;color:black"><span style="color:blue;font-size:8pt"><a href="mailto:ccambron@uw.edu" target="_blank">ccambron@uw.edu</a></span></span><span style="font-family:arial,helvetica,sans-serif;font-size:8pt;color:black"><b> </b>| </span><a href="http://www.sdrg.org/" style="font-family:arial,helvetica,sans-serif;font-size:10.6667px;color:rgb(17,85,204)" target="_blank">www.sdrg.org</a></div></div></div></div></div></div></div></div>
</div>