You are viewing a plain text version of this content. The canonical link for it is here.
Posted to issues@arrow.apache.org by "Antoine Pitrou (Jira)" <ji...@apache.org> on 2022/09/13 10:44:00 UTC
[jira] [Created] (ARROW-17702) [R][CI] Test failure on CentOS 7
Antoine Pitrou created ARROW-17702:
--------------------------------------
Summary: [R][CI] Test failure on CentOS 7
Key: ARROW-17702
URL: https://issues.apache.org/jira/browse/ARROW-17702
Project: Apache Arrow
Issue Type: Bug
Components: Continuous Integration, R
Reporter: Antoine Pitrou
Seen on
https://github.com/apache/arrow/actions/runs/3043073421/jobs/4901940045#step:5:2625
{code}
+ as_arrow_table(mtcars) %>%
+ transmute(mpg, mpg_predicted = mtcars_predict_mpg(disp, cyl)) %>%
+ collect() %>%
+ head()
+ ## Don't show:
+ }) # examplesIf
> library(dplyr, warn.conflicts = FALSE)
> some_model <- lm(mpg ~ disp + cyl, data = mtcars)
> register_scalar_function("mtcars_predict_mpg", function(context, disp,
+ cyl) {
+ predict(some_model, newdata = data.frame(disp, cyl))
+ }, in_type = schema(disp = float64(), cyl = float64()), out_type = float64(), auto_convert = TRUE)
> as_arrow_table(mtcars) %>% transmute(mpg, mpg_predicted = mtcars_predict_mpg(disp,
+ cyl)) %>% collect() %>% head()
Error in `collect()`:
! NotImplemented: Call to R (resolve scalar user-defined function output data type) from a non-R thread from an unsupported context
Backtrace:
▆
1. ├─(if (getRversion() >= "3.4") withAutoprint else force)(...)
2. │ └─base::source(...)
3. │ ├─base::withVisible(eval(ei, envir))
4. │ └─base::eval(ei, envir)
5. │ └─base::eval(ei, envir)
6. ├─... %>% head()
7. ├─utils::head(.)
8. ├─dplyr::collect(.)
9. └─arrow:::collect.arrow_dplyr_query(.)
10. └─base::tryCatch(...)
11. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
12. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
13. └─value[[3L]](cond)
14. └─rlang::abort(conditionMessage(e), call = call)
Execution halted
{code}
--
This message was sent by Atlassian Jira
(v8.20.10#820010)