Minor optimization

We don't need the return value, so (map nil) does the same work as (map 'list).
Added counting of words that match initial letter and POS.