# NOT RUN {
glottodata <- glottofilter(country = c("Netherlands", "Germany", "Belgium") )
glottodata <- glottospotlight(glottodata = glottodata, spotcol = "country",
spotlight = "Netherlands", spotcontrast = "name")
glottomap(glottodata, color = "color")
# }
Run the code above in your browser using DataLab