library(S7)
df <- data.frame(
category = rep(letters[1:3], each = 4),
value = 1:12,
date = as.Date('2024-01-01') + 0:11
)
filters <- list(
category = c("a", "b"),
value = c(3, 11)
)
# Apply filters with logical AND
apply_filters(df, filters, filter_combine_method = "and")
# Apply filters with logical OR
apply_filters(df, filters, filter_combine_method = "or")
# Get expanded filters
apply_filters(df, filters, expanded = TRUE)
Run the code above in your browser using DataLab