Im working on the following idea. Hope you can help.
DATA
reprex <- structure( list( record_id = c(1, 1, 1, 1, 1, 1, 1, 1, 1,