# NOT RUN {
test_df <- data.table(
x = c(1,1,1),
y = c(4,5,6),
double_x = c(2,2,2),
z = c("a","a","b"))
test_df %>%
select.(x, y)
test_df %>%
select.(x:z)
test_df %>%
select.(-y, -z)
test_df %>%
select.(starts_with("x"), z)
test_df %>%
select.(where(is.character), x)
test_df %>%
select.(stuff = x, y)
# }
Run the code above in your browser using DataLab