WIP: [R] Verify CRAN release-13.0.0-rc3

r/R/dplyr-funcs-doc.R

@@ -83,7 +83,7 @@
 #' Functions can be called either as `pkg::fun()` or just `fun()`, i.e. both
 #' `str_sub()` and `stringr::str_sub()` work.
 #'
-#' In addition to these functions, you can call any of Arrow's 254 compute
+#' In addition to these functions, you can call any of Arrow's 260 compute
 #' functions directly. Arrow has many functions that don't map to an existing R
 #' function. In other cases where there is an R function mapping, you can still
 #' call the Arrow function directly if you don't want the adaptations that the R

r/R/dplyr-funcs.R

@@ -123,6 +123,8 @@ unregister_binding <- function(fun_name, registry = nse_funcs,
   invisible(previous_fun)
 }
 
+#' @rdname register_binding
+#' @keywords internal
 register_binding_agg <- function(fun_name,
                                  agg_fun,
                                  registry = agg_funcs,

r/README.md

@@ -1,9 +1,5 @@
 # arrow <img src="https://arrow.apache.org/img/arrow-logo_hex_black-txt_white-bg.png" align="right" alt="" width="120" />
 
-[![cran](https://www.r-pkg.org/badges/version-last-release/arrow)](https://cran.r-project.org/package=arrow)
-[![CI](https://github.com/apache/arrow/workflows/R/badge.svg?event=push)](https://github.com/apache/arrow/actions?query=workflow%3AR+branch%3Amain+event%3Apush)
-[![conda-forge](https://img.shields.io/conda/vn/conda-forge/r-arrow.svg)](https://anaconda.org/conda-forge/r-arrow)
-
 [Apache Arrow](https://arrow.apache.org/) is a cross-language
 development platform for in-memory and larger-than-memory data. It specifies a standardized
 language-independent columnar memory format for flat and hierarchical

r/cran-comments.md

@@ -1,4 +1,5 @@
 ## Test environments
+
 * Debian Linux, GCC, R-devel/R-patched/R-release
 * Fedora Linux, GCC/clang, R-devel
 * Ubuntu Linux 16.04 LTS, R-release, GCC
@@ -8,3 +9,9 @@
 ## R CMD check results
 
 There were no ERRORs or WARNINGs. On some platforms, there is a NOTE about the installed package size.
+
+## Reverse dependency test failures
+
+Reverse dependency checks failed for dataversionr - we have both opened an [issue on the repo](https://github.com/riazarbi/dataversionr/issues/1) and emailed the maintainer, but no response.
+
+Reverse dependency checks failed for pins - we notified them and they updated their tests.

r/data-raw/docgen.R

@@ -54,7 +54,7 @@ file_template <- "# Licensed to the Apache Software Foundation (ASF) under one
 #' to a `dbplyr::tbl_lazy`. This means that the verbs do not eagerly evaluate
 #' the query on the data. To run the query, call either `compute()`,
 #' which returns an `arrow` [Table], or `collect()`, which pulls the resulting
-#' Table into an R `data.frame`.
+#' Table into an R `tibble`.
 #'
 %s
 #'

r/tests/testthat/test-data-type.R

@@ -609,7 +609,7 @@ test_that("DataType$code()", {
   expect_code_roundtrip(dictionary(index_type = int8(), value_type = large_utf8()))
   expect_code_roundtrip(dictionary(index_type = int8(), ordered = TRUE))
 
-  skip_if(packageVersion("rlang") < 1)
+  skip_if(packageVersion("rlang") < "1")
   # Are these unsupported for a reason?
   expect_error(
     eval(DayTimeInterval__initialize()$code()),

r/tests/testthat/test-dplyr-funcs-conditional.R

@@ -19,6 +19,7 @@ library(dplyr, warn.conflicts = FALSE)
 suppressPackageStartupMessages(library(bit64))
 
 skip_if_not_available("acero")
+skip_on_cran()
 
 tbl <- example_data
 tbl$verses <- verses[[1]]

r/tests/testthat/test-dplyr-funcs-datetime.R

@@ -22,6 +22,7 @@ library(lubridate, warn.conflicts = FALSE)
 library(dplyr, warn.conflicts = FALSE)
 
 skip_if_not_available("acero")
+skip_on_cran()
 
 # base::strptime() defaults to local timezone
 # but arrow's strptime defaults to UTC.

r/tests/testthat/test-dplyr-funcs-math.R

@@ -18,6 +18,7 @@
 library(dplyr, warn.conflicts = FALSE)
 
 skip_if_not_available("acero")
+skip_on_cran()
 
 test_that("abs()", {
   df <- tibble(x = c(-127, -10, -1, -0, 0, 1, 10, 127, NA))

r/tests/testthat/test-dplyr-funcs-string.R

@@ -17,6 +17,7 @@
 
 skip_if_not_available("utf8proc")
 skip_if_not_available("acero")
+skip_on_cran()
 
 library(dplyr, warn.conflicts = FALSE)
 library(lubridate)

r/tests/testthat/test-dplyr-funcs-type.R

@@ -20,6 +20,7 @@ suppressPackageStartupMessages(library(bit64))
 suppressPackageStartupMessages(library(lubridate))
 
 skip_if_not_available("acero")
+skip_on_cran()
 
 tbl <- example_data
 

r/tests/testthat/test-dplyr-funcs.R

@@ -14,6 +14,7 @@
 # KIND, either express or implied.  See the License for the
 # specific language governing permissions and limitations
 # under the License.
+skip_on_cran()
 
 test_that("register_binding()/unregister_binding() works", {
   fake_registry <- new.env(parent = emptyenv())

r/tests/testthat/test-schema.R

@@ -43,7 +43,7 @@ test_that("Schema$code()", {
     schema(a = int32(), b = struct(c = double(), d = utf8()), e = list_of(binary()))
   )
 
-  skip_if(packageVersion("rlang") < 1)
+  skip_if(packageVersion("rlang") < "1")
   expect_error(
     eval(schema(x = int32(), y = DayTimeInterval__initialize())$code()),
     "Unsupported type"

r/tools/nixlibs.R

@@ -30,7 +30,7 @@ if (test_mode && is.na(VERSION)) {
 dev_version <- package_version(VERSION)[1, 4]
 
 # Small dev versions are added for R-only changes during CRAN submission.
-if (is.na(dev_version) || dev_version < 100) {
+if (is.na(dev_version) || dev_version < "100") {
   VERSION <- package_version(VERSION)[1, 1:3]
   arrow_repo <- paste0(getOption("arrow.repo", sprintf("https://apache.jfrog.io/artifactory/arrow/r/%s", VERSION)), "/libarrow/")
 } else {

r/tools/winlibs.R

@@ -53,7 +53,7 @@ if (!file.exists(sprintf("windows/arrow-%s/include/arrow/api.h", VERSION))) {
     dev_version <- package_version(VERSION)[1, 4]
 
     # Small dev versions are added for R-only changes during CRAN submission.
-    if (is.na(dev_version) || dev_version < 100) {
+    if (is.na(dev_version) || dev_version < "100") {
       VERSION <- package_version(VERSION)[1, 1:3]
       get_file(rwinlib, VERSION)