Hello,

Below I pasted code where the unit of observation is the police agency. I have a sample of county sheriff's offices (agencysamptype==1), local police departments (agencysamptype==3), and county police departments (agencysamptype==4). I would greatly appreciate help figuring out how to replace the value of "primarypop2010" and "secondarypop2010" with the value of "POPESTIMATE2010" depending on some conditions.

For counties that have both a sheriff's office and one or more local police departments, for the sheriff's offices I would like to replace the value of primary population with the value of POPESTIMATE2010 from the sheriff's office observation minus the values of POPESTIMATE2010 from the local police department observations.in the same county. For the same sheriffs offices for secondary population I would like to replace the value with the sum of the values of POPESTIMATE2010 from the local police department observations (the value being subtracted from the county sheriff's office POPESTIMATE2010 to populate the primary population variable). In the example below with a county sheriff's office and a local police department in the same county, I would replace autauga county sheriff's office's value of primarypopulation with 20612 (54754 - 34142 = 20612) and value of secondarypopulation with 34142. If there were more than one police departments in the county, I would subtract their summed values from the sheriff's office value for primary population and put the summed value of the police departments in secondary population.

Finally, if a county has a county sheriff's office (agencysamptype==1), one or more local police departments (agencysamptype==3), and a county police department (agencysamptype==4), I would like to do the same thing mentioned above but for the county police department instead of the sheriff's office. I would then replace the sheriff's office's primarypop and secondarypop variables with values of zero. I provided an image and code for my example below. Again, I really appreciate any help you can provide.


Array


Code:
* Example generated by -dataex-. To install: ssc install dataex
clear
input str60 agencyname byte fstate int(fcounty agencysamptype) long(POPESTIMATE2010 primarypop2010) byte secondarypop2010
"SUMMERDALE POLICE DEPARTMENT"                        1   3 3      900    900 0
"ELBA POLICE DEPARTMENT"                              1  31 3     3947   3947 0
"SHEFFIELD POLICE DEPARTMENT"                         1  33 3     9040   9040 0
"CONECUH COUNTY SHERIFF'S OFFICE"                     1  35 1    13234      . .
"FAYETTE COUNTY SHERIFF'S OFFICE"                     1  57 1    17227      . .
"HOLLYWOOD POLICE DEPARTMENT"                         1  71 3      997    997 0
"FULTONDALE POLICE DEPARTMENT"                        1  73 3     8378   8378 0
"GUNTERSVILLE POLICE DEPARTMENT"                      1  95 3     8204   8204 0
"MONTGOMERY POLICE DEPARTMENT"                        1 101 3   205593 205593 0
"NEW SITE POLICE DEPARTMENT"                          1 123 3      770    770 0
"NORTHPORT POLICE DEPARTMENT"                         1 125 3    23927  23927 0
"BETHEL POLICE DEPARTMENT"                            2  50 3     6099   6099 0
"HOOPER BAY POLICE DEPARTMENT"                        2 158 3     1094   1094 0
"SITKA POLICE DEPARTMENT"                             2 220 3     8881   8881 0
"WRANGELL POLICE DEPARTMENT"                          2 275 3     2371   2371 0
"PARKER POLICE DEPARTMENT"                            4  12 3     3060   3060 0
"SCOTTSDALE POLICE DEPARTMENT"                        4  13 3   217615 217615 0
"LAKE HAVASU CITY POLICE DEPARTMENT"                  4  15 3    52578  52578 0
"MARICOPA POLICE DEPARTMENT"                          4  21 3    43689  43689 0
"CAMP VERDE MARSHAL'S OFFICE"                         4  25 3    10871  10871 0
"CALHOUN COUNTY SHERIFF'S OFFICE"                     5  13 1     5362      . .
"FORDYCE POLICE DEPARTMENT"                           5  39 3     4279   4279 0
"Mountain PINE POLICE DEPARTMENT"                     5  51 3      758    758 0
"HEMPSTEAD COUNTY SHERIFF'S OFFICE"                   5  57 1    22597      . .
"HOWARD COUNTY SHERIFF'S OFFICE"                      5  61 1    13800      . .
"LAFAYETTE COUNTY SHERIFF'S OFFICE"                   5  73 1     7647      . .
"TEXARKANA ARKANSAS POLICE DEPARTMENT"                5  91 3    29980  29980 0
"LEACHVILLE POLICE DEPARTMENT"                        5  93 3     1977   1977 0
"WHEATLEY Marshal Service"                            5 123 3      350    350 0
"SALINE COUNTY SHERIFF'S OFFICE"                      5 125 1   107653      . .
"MANSFIELD POLICE DEPARTMENT"                         5 131 3     1150   1150 0
"NORPHLET POLICE DEPARTMENT"                          5 139 3      847    847 0
"FARMINGTON POLICE DEPARTMENT"                        5 143 3     5999   5999 0
"PRAIRIE GROVE POLICE DEPARTMENT"                     5 143 3     4461   4461 0
"WOODRUFF COUNTY SHERIFF'S OFFICE"                    5 147 1     7249      . .
"PIEDMONT POLICE DEPARTMENT"                          6   1 3    10701  10701 0
"ALPINE COUNTY SHERIFF/CORONER OFFICE"                6   3 1     1161      . .
"FIREBAUGH POLICE DEPARTMENT"                         6  19 3     7601   7601 0
"LAKE COUNTY SHERIFF'S OFFICE"                        6  33 1    64735      . .
"COVINA POLICE DEPARTMENT"                            6  37 3    47793  47793 0
"MAMMOTH LAKES POLICE DEPARTMENT"                     6  51 3     8231   8231 0
"PACIFIC GROVE POLICE DEPARTMENT"                     6  53 3    15082  15082 0
"PLACENTIA POLICE DEPARTMENT"                         6  59 3    50998  50998 0
"LA HABRA POLICE DEPARTMENT"                          6  59 3    60357  60357 0
"WESTMINSTER POLICE DEPARTMENT"                       6  59 3    89769  89769 0
"FONTANA POLICE DEPARTMENT"                           6  71 3   197342 197342 0
"LA MESA POLICE DEPARTMENT"                           6  73 3    57146  57146 0
"SAN FRANCISCO CITY AND COUNTY SHERIFF'S Department"  6  75 1   805550      . .
"PASO ROBLES POLICE DEPARTMENT"                       6  79 3    29790  29790 0
"ANDERSON POLICE DEPARTMENT"                          6  89 3     9940   9940 0
"OXNARD POLICE DEPARTMENT"                            6 111 3   198465 198465 0
"CALIFORNIA HIGHWAY PATROL"                           6   . 5 37320903      . .
"LITTLETON POLICE DEPARTMENT"                         8   5 3    41916  41916 0
"DELTA COUNTY SHERIFF'S OFFICE"                       8  29 1    30859      . .
"SIMLA POLICE DEPARTMENT"                             8  39 3      614    614 0
"FREMONT COUNTY SHERIFF'S OFFICE"                     8  43 1    46835      . .
"STERLING POLICE DEPARTMENT"                          8  75 3    14095  14095 0
"ROCKY HILL POLICE DEPARTMENT"                        9   3 3    19718  19718 0
"WEST HAVEN POLICE DEPARTMENT"                        9   9 3    55570  55570 0
"ORANGE POLICE DEPARTMENT"                            9   9 3    13961  13961 0
"MEXICO BEACH POLICE DEPARTMENT"                     12   5 3     1072   1072 0
"LAFAYETTE COUNTY SHERIFF'S OFFICE"                  12  67 1     8810      . .
"LAKE COUNTY SHERIFF'S OFFICE"                       12  69 1   297708      . .
"TAVARES POLICE DEPARTMENT"                          12  69 3    14010  14010 0
"NEW PORT RICHEY POLICE DEPARTMENT"                  12 101 3    14917  14917 0
"CLEARWATER POLICE DEPARTMENT"                       12 103 3   108933 108933 0
"BELLEAIR POLICE DEPARTMENT"                         12 103 3     3944   3944 0
"LAKE WALES POLICE DEPARTMENT"                       12 105 3    14201  14201 0
"GULF BREEZE POLICE DEPARTMENT"                      12 113 3     5785   5785 0
"BULLOCH COUNTY SHERIFF'S DEPARTMENT"                13  31 1    70562      . .
"BOWDON POLICE DEPARTMENT"                           13  45 3     2041   2041 0
"DOUGLAS POLICE DEPARTMENT"                          13  69 3    11684  11684 0
"CRAWFORD COUNTY SHERIFF'S DEPARTMENT"               13  79 1    12616      . .
"CHATTAHOOCHEE HILLS POLICE DEPARTMENT"              13 121 3     2648   2648 0
"CENTERVILLE POLICE DEPARTMENT"                      13 153 3     7184   7184 0
"MARSHALLVILLE POLICE DEPARTMENT"                    13 193 3     1439   1439 0
"COLQUITT POLICE DEPARTMENT"                         13 201 3     1997   1997 0
"MADISON POLICE DEPARTMENT"                          13 211 3     3985   3985 0
"JASPER POLICE DEPARTMENT"                           13 227 3     3678   3678 0
"PICKENS COUNTY SHERIFF'S OFFICE"                    13 227 1    29457      . .
"LUMBER CITY POLICE DEPARTMENT"                      13 271 3     1321   1321 0
"SYCAMORE POLICE DEPARTMENT"                         13 287 3      722    722 0
"THOMASTON POLICE DEPARTMENT"                        13 293 3     9127   9127 0
"BONNEVILLE COUNTY SHERIFF'S OFFICE"                 16  19 1   104672      . .
"BUTTE COUNTY SHERIFF'S OFFICE"                      16  23 1     2915      . .
"HEYBURN POLICE DEPARTMENT"                          16  67 3     3093   3093 0
"NEZ PERCE COUNTY SHERIFF'S OFFICE"                  16  69 1    39315      . .
"OSBURN POLICE DEPARTMENT"                           16  79 3     1551   1551 0
"KELLOGG POLICE DEPARTMENT"                          16  79 3     2135   2135 0
"MCCALL POLICE DEPARTMENT"                           16  85 3     2956   2956 0
"ASHLAND POLICE DEPARTMENT"                          17  17 3     1336   1336 0
"JUSTICE POLICE DEPARTMENT"                          17  31 3    12937  12937 0
"TOLEDO POLICE DEPARTMENT"                           17  35 3     1230   1230 0
"WATERMAN POLICE DEPARTMENT"                         17  37 3     1514   1514 0
"GENOA POLICE DEPARTMENT"                            17  37 3     5177   5177 0
"DEWITT COUNTY SHERIFF'S OFFICE"                     17  39 1    16590      . .
"CARTHAGE POLICE DEPARTMENT"                         17  67 3     2603   2603 0
"AUGUSTA POLICE DEPARTMENT"                          17  67 3      586    586 0
"LAKE BLUFF POLICE DEPARTMENT"                       17  97 3     5708   5708 0
"WAUKEGAN POLICE DEPARTMENT"                         17  97 3    89126  89126 0
"TONICA POLICE DEPARTMENT"                           17  99 3      767    767 0
"BRIDGEPORT POLICE DEPARTMENT"                       17 101 3     1893   1893 0
"HEYWORTH POLICE DEPARTMENT"                         17 113 3     2843   2843 0
"GRANITE CITY POLICE DEPARTMENT"                     17 119 3    29798  29798 0
"CENTRALIA POLICE DEPARTMENT"                        17 121 3    13023  13023 0
"ATHENS POLICE DEPARTMENT"                           17 129 3     1985   1985 0
"JACKSONVILLE POLICE DEPARTMENT"                     17 137 3    19423  19423 0
"OREGON POLICE DEPARTMENT"                           17 141 3     3706   3706 0
"O'FALLON POLICE DEPARTMENT"                         17 163 3    28790  28790 0
"CAHOKIA POLICE DEPARTMENT"                          17 163 3    15224  15224 0
"SPAULDING POLICE DEPARTMENT"                        17 167 3      874    874 0
"SANGAMON COUNTY SHERIFF'S OFFICE"                   17 167 1   197767      . .
"LOAMI POLICE DEPARTMENT"                            17 167 3      746    746 0
"WINCHESTER POLICE DEPARTMENT"                       17 171 3     1585   1585 0
"HOPEDALE POLICE DEPARTMENT"                         17 179 3      868    868 0
"WASHINGTON POLICE DEPARTMENT"                       17 179 3    15255  15255 0
"WHITE COUNTY SHERIFF'S OFFICE"                      17 193 1    14600      . .
"CRETE POLICE DEPARTMENT"                            17 197 3     8289   8289 0
"UNIVERSITY PARK POLICE DEPARTMENT"                  17 197 3     7127   7127 0
"JAMESTOWN POLICE DEPARTMENT"                        18  11 3      959    959 0
"ADVANCE POLICE DEPARTMENT"                          18  11 3      481    481 0
"FLORA POLICE DEPARTMENT"                            18  15 3     2034   2034 0
"SELLERSBURG POLICE DEPARTMENT"                      18  19 3     8353   8353 0
"DALEVILLE POLICE DEPARTMENT"                        18  35 3     1647   1647 0
"DELAWARE COUNTY SHERIFF'S DEPARTMENT"               18  35 1   117652      . .
"ELKHART COUNTY SHERIFF'S DEPARTMENT"                18  39 1   197444      . .
"GREENVILLE POLICE DEPARTMENT"                       18  43 3      601    601 0
"LINTON POLICE DEPARTMENT"                           18  55 3     5414   5414 0
"HENRY COUNTY SHERIFF'S DEPARTMENT"                  18  65 1    49530      . .
"NEW CASTLE POLICE DEPARTMENT"                       18  65 3    18123  18123 0
"OAKTOWN POLICE Department"                          18  83 3      604    604 0
"MERRILLVILLE POLICE DEPARTMENT"                     18  89 3    34966  34966 0
"CLERMONT POLICE DEPARTMENT"                         18  97 3     1363   1363 0
"BREMEN POLICE DEPARTMENT"                           18  99 3     4582   4582 0
"MARSHALL COUNTY SHERIFF'S DEPARTMENT"               18  99 1    46999      . .
"MIAMI COUNTY SHERIFF'S DEPARTMENT"                  18 103 1    36810      . .
"WAVELAND POLICE DEPARTMENT"                         18 107 3      420    420 0
"ALBION POLICE DEPARTMENT"                           18 113 3     2350   2350 0
"ROME CITY POLICE DEPARTMENT"                        18 113 3     1380   1380 0
"WINSLOW POLICE DEPARTMENT"                          18 125 3      849    849 0
"KOUTS POLICE DEPARTMENT"                            18 127 3     1888   1888 0
"WINAMAC POLICE DEPARTMENT"                          18 131 3     2480   2480 0
"CARTHAGE POLICE DEPARTMENT"                         18 139 3      932    932 0
"TIPTON POLICE DEPARTMENT"                           18 159 3     5353   5353 0
"ADAMS COUNTY SHERIFF'S OFFICE"                      19   3 1     4023      . .
"STRAWBERRY POINT POLICE DEPARTMENT"                 19  43 3     1275   1275 0
"ARMSTRONG POLICE DEPARTMENT"                        19  63 3      922    922 0
"GARNER POLICE DEPARTMENT"                           19  81 3     3118   3118 0
"HUMBOLDT COUNTY SHERIFF'S OFFICE"                   19  91 1     9793      . .
"WILLIAMSBURG POLICE DEPARTMENT"                     19  95 3     3067   3067 0
"SABULA POLICE DEPARTMENT"                           19  97 3      587    587 0
"KOSSUTH COUNTY SHERIFF'S OFFICE"                    19 109 1    15525      . .
"MUSCATINE POLICE DEPARTMENT"                        19 139 3    23771  23771 0
"MERRILL POLICE DEPARTMENT"                          19 149 3      757    757 0
"CARTER LAKE POLICE DEPARTMENT"                      19 155 3     3791   3791 0
"ELDRIDGE POLICE DEPARTMENT"                         19 163 3     5666   5666 0
"WALCOTT POLICE DEPARTMENT"                          19 163 3     1617   1617 0
"STORY COUNTY SHERIFF'S OFFICE"                      19 169 1    89654      . .
"INDIANOLA POLICE DEPARTMENT"                        19 181 3    14819  14819 0
"CARLISLE POLICE DEPARTMENT"                         19 181 3     3891   3891 0
"BUTLER COUNTY SHERIFF'S OFFICE"                     20  15 1    65904      . .
"LE ROY POLICE DEPARTMENT"                           20  31 3      562    562 0
"ARMA POLICE DEPARTMENT"                             20  37 3     1488   1488 0
"DOUGLAS COUNTY SHERIFF'S OFFICE"                    20  45 1   111195      . .
"HAMILTON COUNTY SHERIFF'S OFFICE"                   20  75 1     2707      . .
"HOLTON POLICE DEPARTMENT"                           20  85 3     3321   3321 0
"GARDNER POLICE DEPARTMENT"                          20  91 3    19216  19216 0
"ROLLA POLICE DEPARTMENT"                            20 129 3      443    443 0
"POTTAWATOMIE COUNTY SHERIFF'S OFFICE"               20 149 1    21728      . .
"GODDARD POLICE DEPARTMENT"                          20 173 3     4417   4417 0
"BENTLEY POLICE DEPARTMENT"                          20 173 3      530    530 0
"LIBERAL POLICE DEPARTMENT"                          20 175 3    20553  20553 0
"FREDONIA POLICE DEPARTMENT"                         20 205 3     2472   2472 0
"ADAIR COUNTY SHERIFF'S OFFICE"                      21   1 1    18761      . .
"PIONEER VILLAGE POLICE DEPARTMENT"                  21  29 3     2716   2716 0
"BELLEVUE POLICE DEPARTMENT"                         21  37 3     5957   5957 0
"WHEELWRIGHT POLICE DEPARTMENT"                      21  71 3     1194   1194 0
"MAYFIELD POLICE DEPARTMENT"                         21  83 3    10058  10058 0
"CLARKSON POLICE DEPARTMENT"                         21  85 3      875    875 0
"SOUTH SHORE POLICE DEPARTMENT"                      21  89 3     1125   1125 0
"HENRY COUNTY SHERIFF'S OFFICE"                      21 103 1    15377      . .
"PARK HILLS POLICE DEPARTMENT"                       21 117 3     2989   2989 0
"BARBOURVILLE POLICE DEPARTMENT"                     21 121 3     3173   3173 0
"RICHMOND POLICE DEPARTMENT"                         21 151 3    31690  31690 0
"MOREHEAD POLICE DEPARTMENT"                         21 205 3     6877   6877 0
"GRAYSON POLICE DEPARTMENT"                          22  21 3      529    529 0
"MARINGOUIN POLICE DEPARTMENT"                       22  47 3     1097   1097 0
"JEFFERSON DAVIS PARISH SHERIFF'S OFFICE"            22  53 1    31633      . .
"LAFAYETTE POLICE DEPARTMENT"                        22  55 3   121834 121834 0
"LASALLE PARISH SHERIFF'S OFFICE"                    22  59 1    14908      . .
"LIVINGSTON POLICE DEPARTMENT"                       22  63 3     1780   1780 0
"MER ROUGE POLICE DEPARTMENT"                        22  67 3      620    620 0
"FRANKLIN POLICE DEPARTMENT"                         22 101 3     7640   7640 0
"Saint JOSEPH POLICE DEPARTMENT"                     22 107 3     1171   1171 0
"LA PLATA POLICE"                                    24  17 3     8802   8802 0
"ST MICHAELS POLICE"                                 24  41 3     1031   1031 0
"EASTON POLICE"                                      24  41 3    16266  16266 0
"EASTHAM POLICE DEPARTMENT"                          25   1 3     4956   4956 0
"SALISBURY POLICE DEPARTMENT"                        25   9 3     8309   8309 0
"SUNDERLAND POLICE DEPARTMENT"                       25  11 3     3684   3684 0
end
label values agencysamptype agency
label def agency 1 "sheriff", modify
label def agency 3 "local pd", modify
label def agency 5 "state  1", modify