added function TopCountries to try out some features of github, roxygen2 and R-Studio