Create decadalTotals.R