# NOT RUN {
test_df <- data.table(
x = c(1,2,3,4),
y = c(4,5,6,7),
z = c("a","a","a","b"))
test_df %>%
slice.(1:3)
test_df %>%
slice.(1, 3)
test_df %>%
slice.(1, .by = z)
test_df %>%
slice_head.(1, .by = z)
test_df %>%
slice_tail.(1, .by = z)
test_df %>%
slice_max.(order_by = x, .by = z)
test_df %>%
slice_min.(order_by = y, .by = z)
# }
Run the code above in your browser using DataLab