Wrong cameo codes '13y' for some events in the 2017 file

[andybega]

There are some events that have wrong cameo codes, '13y':

query_icews("select * from events where cameo_code=='13y' limit 5; ")
  event_id event_date                   source_name                        source_sectors
1 25333471   20170104 Head of Government (Thailand) Executive Office,Government,Executive
2 25450892   20170208                       Somalia                                  NULL
3 25481973   20170216                Police (India)                     Government,Police
4 25491163   20170219             Police (Thailand)                     Government,Police
  source_country               event_text cameo_code intensity           target_name
1       Thailand Threaten with repression        13y        -7   Industry (Thailand)
2        Somalia Threaten with repression        13y        -7 Militant (Al-Shabaab)
3          India Threaten with repression        13y        -7           Men (India)
4       Thailand Threaten with repression        13y        -7    Citizen (Thailand)
                                       target_sectors target_country story_id
1                                     Business,Social       Thailand 43133955
2 Insurgents,Dissident,International Religious,Muslim        Somalia 43430619
3       General Population / Civilian / Social,Social          India 43503756
4       Social,General Population / Civilian / Social       Thailand 43525288
  sentence_number                  publisher    city district               province
1               1 Associated Press Newswires Bangkok     NULL  Krung Thep Mahanakhon
2               1       Agence France-Presse    NULL     NULL                   NULL
3               3            Hindustan Times   Noida   Meerut State of Uttar Pradesh
4               3               Reuters News Bangkok     NULL  Krung Thep Mahanakhon
   country latitude longitude year yearmonth              source_file
1 Thailand 13.75400  100.5010 2017    201701 Events.2017.20201119.tab
2  Somalia  2.03711   45.3438 2017    201702 Events.2017.20201119.tab
3    India 28.58000   77.3300 2017    201702 Events.2017.20201119.tab
4 Thailand 13.75400  100.5010 2017    201702 Events.2017.20201119.tab
 [ reached 'max' / getOption("max.print") -- omitted 1 rows ]

This affects 27 cases, all from the 2017 events file that previously had problems too.

query_icews("select count(*), source_file from events where cameo_code=='13y' group by source_file;")
  count(*)              source_file
1       27 Events.2017.20201119.tab

These should be 137 "Threaten with repression".