2~4행만 잘라서 출력했습니다. 다음과 같이 특정 행만 잘라 반환할 수도 있습니다.
order_info_r %>% slice(c(1, 3)) # A tibble: 2 x 5 order_no item_id reserv_no quantity sales <chr> <chr> <chr> <dbl> <dbl> 1 191228137840110010 M0003 2019122805 1 17000 2 191228547385810010 M0003 2019122807 2 34000
1행과 3행만 잘라서 출력했습니다.