# NOT RUN {
library(SangerTools)
health_data <- SangerTools::age_bandizer(df = SangerTools::master_patient_index,
Age_col=Age)
df_rates <- standardised_rates_df(
df = health_data,
Split_by = Locality,
Condition = Diabetes,
Population_Standard = NULL,
Granular = TRUE,
Ageband
)
print(df_rates)
# }
Run the code above in your browser using DataLab