* Violent crimes by type of weapon used.

GET FILE='Directory\Path\NIBRS offense segment.sav'.
SELECT IF (offense LE 130).
RECODE weapon1 
  ('99' = 1)
  ('12' = 2)
  ('14' = 3)
  ('13' = 4)
  ('11','15' = 5)
  ('20' = 6)
  ('30','35','50','60','65','70','85','90' = 7)
  ('40' = 8)
  ('95' = 9)INTO wpn1.
VALUE LABELS wpn1
  1 'None'
  2 'Handgun'
  3 'Shotgun'
  4 'Rifle'
  5 'Other firearm'
  6 'Knife/Cutting Instrument'
  7 'Other weapon'
  8 'Personal Weapon (hand, feet, etc.)'
  9 'Unknown'.
TEMPORARY.
  VARIABLE LABELS wpn1 '' .
TABLES
  /FORMAT BLANK MISSING('.')
  /GBASE=CASES
  /FTOTAL= $t000001 "Total"
  /TABLE=wpn1 + $t000001  BY offense > (STATISTICS)
  /STATISTICS cpct( wpn1( PCT5.1 ) '':offense )
  /TITLE  'Violent crimes by type of weapon used'.