diff --git a/r/NAMESPACE b/r/NAMESPACE
index 01a4a3fba72e0..8846defbd8e65 100644
--- a/r/NAMESPACE
+++ b/r/NAMESPACE
@@ -99,7 +99,6 @@ export(cast_options)
 export(chunked_array)
 export(csv_convert_options)
 export(csv_parse_options)
-export(csv_read)
 export(csv_read_options)
 export(csv_table_reader)
 export(date32)
@@ -121,6 +120,7 @@ export(mmap_open)
 export(null)
 export(print.integer64)
 export(read_arrow)
+export(read_csv_arrow)
 export(read_feather)
 export(read_message)
 export(read_record_batch)
diff --git a/r/R/csv.R b/r/R/csv.R
index 87343a6070ab1..bad87559c05e5 100644
--- a/r/R/csv.R
+++ b/r/R/csv.R
@@ -176,7 +176,7 @@ csv_table_reader.default <- function(file,
 #'
 #' @param ... Used to construct an arrow::csv::TableReader
 #' @export
-csv_read <- function(...) {
+read_csv_arrow <- function(...) {
   csv_table_reader(...)$Read()
 }
 
diff --git a/r/man/csv_read.Rd b/r/man/read_csv_arrow.Rd
similarity index 82%
rename from r/man/csv_read.Rd
rename to r/man/read_csv_arrow.Rd
index 8ef2fc4b57c3c..4cdca91246b5b 100644
--- a/r/man/csv_read.Rd
+++ b/r/man/read_csv_arrow.Rd
@@ -1,10 +1,10 @@
 % Generated by roxygen2: do not edit by hand
 % Please edit documentation in R/csv.R
-\name{csv_read}
-\alias{csv_read}
+\name{read_csv_arrow}
+\alias{read_csv_arrow}
 \title{Read csv file into an arrow::Table}
 \usage{
-csv_read(...)
+read_csv_arrow(...)
 }
 \arguments{
 \item{...}{Used to construct an arrow::csv::TableReader}
diff --git a/r/tests/testthat/test-arrow-csv-.R b/r/tests/testthat/test-arrow-csv-.R
index e0a20cc90ec29..2afd0622821ae 100644
--- a/r/tests/testthat/test-arrow-csv-.R
+++ b/r/tests/testthat/test-arrow-csv-.R
@@ -21,9 +21,9 @@ test_that("Can read csv file", {
   tf <- local_tempfile()
   write.csv(iris, tf, row.names = FALSE, quote = FALSE)
 
-  tab1 <- csv_read(tf)
-  tab2 <- csv_read(mmap_open(tf))
-  tab3 <- csv_read(ReadableFile(tf))
+  tab1 <- read_csv_arrow(tf)
+  tab2 <- read_csv_arrow(mmap_open(tf))
+  tab3 <- read_csv_arrow(ReadableFile(tf))
 
   iris$Species <- as.character(iris$Species)
   tab0 <- table(iris)