data(exercise_df)
exercise_node <- data.tree::as.Node(exercise_df)
result <- fill_NA_level(input_node = exercise_node,
field_name = "exercise_time",
by_level = 2,
fill_with = "quarterly")
print(result, "exercise_time")
Run the code above in your browser using DataLab