Update agecount_test.R