Feature Request: Enhance derive_locf_records()

[bundfussr]

Feature Idea

derive_locf_records() should be enhanced such that it works when analysis visits are assigned based on time windows.

Relevant Input

No response

Relevant Output

No response

Reproducible Example/Pseudo Code

library(dplyr)
adbs <- tribble(
  ~AVISITN, ~ADY,  ~AVAL,
  1,           1,  10,
  2,           8,  12,
  3,          15,  10,
  3,          17,  14,
  5,          29,  13
) %>%
  mutate(USUBJID = "1")

visit_ref = tribble(
  ~AVISITN, ~ADY,
  1,           1,
  2,          12,
  3,          19,
  4,          26,
  5,          33
)

The expected result is:

  AVISITN   ADY  AVAL USUBJID DTYPE
    <dbl> <dbl> <dbl> <chr>   <chr>
1       1     1    10 1       NA   
2       2     8    12 1       NA   
3       3    15    10 1       NA   
4       3    17    14 1       NA   
5       4    26    14 1       LOCF 
6       5    29    13 1       NA   

This can't be produced by the current version of derive_locf_records() because all variables in the reference dataset are considered when determining whether a visit is available or not. For example,

derive_locf_records(
  adbs,
  dataset_ref = visit_ref,
  by_vars = exprs(USUBJID),
  order = exprs(ADY)
)

produces

# A tibble: 9 × 5
  AVISITN   ADY  AVAL USUBJID DTYPE
    <dbl> <dbl> <dbl> <chr>   <chr>
1       1     1    10 1       NA   
2       2     8    12 1       NA   
3       2    12    12 1       LOCF 
4       3    15    10 1       NA   
5       3    17    14 1       NA   
6       3    19    14 1       LOCF 
7       4    26    14 1       LOCF 
8       5    29    13 1       NA   
9       5    33    13 1       LOCF 

[bms63]

@gg106046 any chance you want to have a go at this update for your function?

[gg106046]

@gg106046 any chance you want to have a go at this update for your function?

Hi @bms63, sure! I can take this up!

[bms63]

Awesome thanks @gg106046 !!!!