/*SHORT TITLE: Sample program for Puerto Rico data */ /*NOTE: Puerto Rico table locations are *NOT* the same as those for the */ /* states. */ /*NOTE: ICPSR says lrecl is 2016 with 5 records/case. Not so. */ /* lrecl=10080 is correct. See codebook. */ set width 80. file handle in/name="/eds/datasets/stf3a-80/data/pr-new.dat" lrecl=10080. data list file=in / SUMLEV 10-11 URABRURL 12-13 FIPSTAT 34-35 SMSA 36-39 MUNICIP 40-42 t001c1 to t001c3 253-279 t002c1 280-288 t003c1 289-297 t004c1 to t004c3 298-324 t005c1 325-333 t006c1 334-342 t010c1 370-378 t016c1 to t016c10 874-963 t033c1 to t033c6 1642-1695 t034c1 to t034c6 1696-1749 t035c1 to t035c10 1750-1839 t036c1 to t036c3 1840-1866 t038c1 to t038c5 1903-1947 t040c1 to t040c6 2119-2172 t043c1 to t043c5 2260-2304 t068c1 to t068c19 3436-3606 t069c1 3607-3615 t123c1 to t123c3 6556-6582 . Select if (sumlev=11). freq vars=MUNICIP smsa t123c3. save outfile="1980censusdataPR-new.sav".