diff --git a/r/tests/testthat/test-dplyr-funcs-datetime.R b/r/tests/testthat/test-dplyr-funcs-datetime.R index a4c5ee3c224..47626a6cb19 100644 --- a/r/tests/testthat/test-dplyr-funcs-datetime.R +++ b/r/tests/testthat/test-dplyr-funcs-datetime.R @@ -841,8 +841,6 @@ test_that("month() supports integer input", { test_df_month ) - skip_on_os("windows") # https://issues.apache.org/jira/browse/ARROW-13168 - compare_dplyr_binding( .input %>% # R returns ordered factor whereas Arrow returns character @@ -904,8 +902,6 @@ test_that("month() errors with double input and returns NA with int outside 1:12 }) test_that("date works in arrow", { - # https://issues.apache.org/jira/browse/ARROW-13168 - skip_on_os("windows") # this date is specific since lubridate::date() is different from base::as.Date() # since as.Date returns the UTC date and date() doesn't test_df <- tibble( @@ -1123,7 +1119,6 @@ test_that("difftime works correctly", { ignore_attr = TRUE ) - skip_on_os("windows") test_df_with_tz <- tibble( time1 = as.POSIXct( c("2021-02-20", "2021-07-31", "2021-10-30", "2021-01-31"), diff --git a/r/tests/testthat/test-dplyr-funcs-type.R b/r/tests/testthat/test-dplyr-funcs-type.R index 6a07d36e818..e4283e39b59 100644 --- a/r/tests/testthat/test-dplyr-funcs-type.R +++ b/r/tests/testthat/test-dplyr-funcs-type.R @@ -873,7 +873,6 @@ test_that("`as.Date()` and `as_date()`", { fixed = TRUE ) - # we do not support as.Date() with double/ float (error surfaced from C++) # TODO revisit after https://issues.apache.org/jira/browse/ARROW-15798 expect_error( @@ -958,7 +957,11 @@ test_that("`as_datetime()`", { }) test_that("format date/time", { - skip_on_os("windows") # https://issues.apache.org/jira/browse/ARROW-13168 + # locale issues + # TODO revisit after https://issues.apache.org/jira/browse/ARROW-16399 is done + if (tolower(Sys.info()[["sysname"]]) == "windows") { + withr::local_locale(LC_TIME = "C") + } # In 3.4 the lack of tzone attribute causes spurious failures skip_if_r_version("3.4.4")