if (FALSE) {
dat_expanded <- expand(
data = dat,
subject = c("pt1", "pt2", "pt3", "pt4"),
visit = c("vis1", "vis2", "vis3")
)
dat_filled <- fill_loc(
data = dat_expanded,
vars = c("Sex", "Age"),
group = "subject",
order = "visit"
)
## Or
dat_filled <- expand_locf(
data = dat,
subject = c("pt1", "pt2", "pt3", "pt4"),
visit = c("vis1", "vis2", "vis3"),
vars = c("Sex", "Age"),
group = "subject",
order = "visit"
)
}
Run the code above in your browser using DataLab