Create worldmapchart.R

Need to size markers smaller and get them to load faster.