st <- star_schema(mrs_age, dm_mrs_age) |>
snake_case()
st <- star_schema(mrs_age, dm_mrs_age) |>
role_playing_dimension(
dim_names = c("when", "when_available"),
name = "When Common",
attributes = c("Date", "Week", "Year")
) |>
snake_case()
Run the code above in your browser using DataLab