"Please can anyone suggest some dplyr code that can turn my sample data_in
into my sample data_out
?"
data_in <- tibble::tribble(
~patient, ~delivery_date, ~obs_point, ~obs_date,
"A", "2024-01-28", "antenatal", "2024-01-01",
"A", "2024-01-28", "at_delivery", "2024-01-28",
"B", "2024-01-28", "at_delivery", "2024-01-27",
"B", "2024-01-28", "at_delivery", "2024-01-28",
"C", "2024-01-28", "at_delivery", "2024-01-27",