f.raw <- as.path(dataDir, "PollStar_indies.txt")

DTLabels <- fread(f.raw, colClasses=c("character"))
setkey(DTLabels, "Company") 

unique(DTLabels, by="Company")[, .N, by=Country]


490 Total labels
Breakdown per country: 

           Country   N
 1:  United States 388
 2:         Canada  38
 3: United Kingdom  36
 4:          Italy   2
 5:        Germany   4
 6:    Netherlands   6
 7:      Australia  10
 8:    Switzerland   1
 9:        Hungary   1
10:         France   1
11:        Austria   1
12:        Finland   1
13:         Mexico   1