A thought collector

thoughts.lua

local events_by_type={}
for k,v in pairs(df.global.world.units.active) do
  if dfhack.units.isCitizen(v) then
    local mytypes={}
    for idx,event in pairs(v.status.recent_events) do
      local t=event.type
      if mytypes[t]==nil then
        if events_by_type[t] then
          events_by_type[t]=events_by_type[t]+1
        else
          events_by_type[t]=1
        end
        mytypes[t]=true
      end
    end
  end
end
for k,v in pairs(events_by_type) do
  print(df.unit_thought_type[k],v)
end