# Propagate NA values through datetime components
partial_datetime <- list(
year = "2020", month = NA_character_, day = "01",
hour = "12", minute = NA_character_, second = "34"
)
propagated_datetime <- admiral:::propagate_na_values(partial_datetime)
print(propagated_datetime)
# Propagate NA values for datetime with missing higher order components
partial_missing <- list(
year = NA_character_, month = "01", day = "01",
hour = "12", minute = "00", second = "00"
)
propagated_missing <- admiral:::propagate_na_values(partial_missing)
print(propagated_missing)
partial_missing_date <- list(
year = "2023", month = NA_character_, day = "01"
)
propagated_missing_date <- admiral:::propagate_na_values(partial_missing_date)
print(propagated_missing_date)
Run the code above in your browser using DataLab