function drawChartSpecimensByCountry() {
  var chartData = google.visualization.arrayToDataTable([
    ['Series', 'Specimen Count (overall)'],
    ['', 3],
    ['Guadeloupe', 1],
    ['Indonesia', 5],
    ['Japan', 82],
    ['New Caledonia', 1],
    ['Puerto Rico', 4],
    ['United States Pacific Island Wildlife Refuges', 4]
  ]);
  var chartOptions = {
    region: 'world',
    fontSize: 'automatic',
    title: 'n=100',
    doWeHaveDanglingCommas: 'No ;-)'
  };
  if (window.customizeGoogleChartOptions)
    customizeGoogleChartOptions(chartOptions, 'SpecimensByCountry', 'geo', 7, 0);
  var chart = new google.visualization.GeoChart(document.getElementById('chartDivSpecimensByCountry'));
  chart.draw(chartData, chartOptions);
}
google.load('visualization', '1', {'packages': ['geochart']});
google.setOnLoadCallback(drawChartSpecimensByCountry);