function drawChartSpecimensByEpithet() {
  var chartData = google.visualization.arrayToDataTable([
    ['Series', 'Specimen Count (overall)'],
    ['', 3],
    ['andrzejowskii', 1],
    ['cingulatior', 3],
    ['duboisi', 428],
    ['lignitarum', 97],
    ['marki', 1],
    ['menestrieri', 3],
    ['pauli', 1],
    ['praebidentata', 2],
    ['prolignitarum', 33],
    ['semistriata', 1],
    ['subcorrugata', 12],
    ['sulcata', 30]
  ]);
  var chartOptions = {
    pieHole: 0,
    title: 'Specimens by Species (n=615)',
    fontSize: 'automatic',
    doWeHaveDanglingCommas: 'No ;-)'
  };
  if (window.customizeGoogleChartOptions)
    customizeGoogleChartOptions(chartOptions, 'SpecimensByEpithet', 'pie', 13, 0);
  var chart = new google.visualization.PieChart(document.getElementById('chartDivSpecimensByEpithet'));
  chart.draw(chartData, chartOptions);
}
google.load('visualization', '1', {'packages': ['corechart']});
google.setOnLoadCallback(drawChartSpecimensByEpithet);