agg_analytics <- runQry(Q) counts <- sapply(agg_analytics[, desc(agg_analytics)["character"][[2]], with=FALSE], mnchar) country_name 33 country_code 2 continent 13 continent_group 9 continent_order 15 store_name 28 store_name_short 14 store_group 14 store_group_broad 14 store_musicbucket 14 store_videobucket 0 release_name 245 release_is_deleted 1 release_priority 6 release_version 94 release_product_type 10 music_vs_video_by_product 5 release_genre 11 release_genre_group 22 release_genre_group_broad 17 label_name 55 label_owner 10 label_is_distributor 1 label_sc_group 7 label_country 33 label_continent 13 artist_name 255 artist_country 33 transac_type_abbr 2 transac_type 25 transac_type_group 8 music_vs_video_by_transac 14 stream_vs_download 8 album_vs_track 24