diff --git a/r/R/dataset-write.R b/r/R/dataset-write.R
index 8f410e284c22e..b17c5f39ba8ed 100644
--- a/r/R/dataset-write.R
+++ b/r/R/dataset-write.R
@@ -76,6 +76,7 @@
 #' # You can obtain the same result as as the previous examples using arrow with
 #' # a dplyr pipeline. This will be the same as two_levels_tree above, but the
 #' # output directory will be different.
+#' library(dplyr)
 #' two_levels_tree_2 <- tempfile()
 #' mtcars %>%
 #'   group_by(cyl, gear) %>%
diff --git a/r/man/write_dataset.Rd b/r/man/write_dataset.Rd
index 4e44f12e2fbfc..6f36f8e72e8c6 100644
--- a/r/man/write_dataset.Rd
+++ b/r/man/write_dataset.Rd
@@ -87,6 +87,7 @@ list.files(two_levels_tree, recursive = TRUE)
 # You can obtain the same result as as the previous examples using arrow with
 # a dplyr pipeline. This will be the same as two_levels_tree above, but the
 # output directory will be different.
+library(dplyr)
 two_levels_tree_2 <- tempfile()
 mtcars \%>\%
   group_by(cyl, gear) \%>\%