I have data like this:
library(data.table) id <- c(\"1232\",\"1232\",\"1232\",\"4211\",\"4211\",\"4211\") conversion <- c(0,0,0,1,1,1) DT <- data.ta
Have you tried something like the following?
library(tidyverse) final_conversion_dat <- DT %>% group_by(id) %>% mutate(date = as.Date(date), final_conversion = ifelse(date == max(date, na.rm = T) & conversion == 1, 1, 0))