dbplyr中的sql_variant是否正常工作?

时间:2017-09-16 10:52:16

标签: r dplyr dbplyr

让我们看看?sql_variant中的示例:

我们为聚合函数定义了一个新的翻译函数,从默认函数扩展而来:

postgres_agg <- sql_translator(.parent = base_agg,
  cor = sql_prefix("corr"),
  cov = sql_prefix("covar_samp"),
  sd =  sql_prefix("stddev_samp"),
  var = sql_prefix("var_samp")
)

然后我们定义一个新的变体,它由3种不同类型的翻译函数组成(这里是2):

postgres_var <- sql_variant(
  base_scalar,
  postgres_agg
)

translate_sql(cor(x, y), variant = postgres_var)
# <SQL> COR("x", "y")
translate_sql(sd(income / years), variant = postgres_var)
# <SQL> SD("income" / "years")

这些看起来不会翻译给我,它们不应该是"CORR""STDDEV_SAMP"吗?

# Original comment:
# Any functions not explicitly listed in the converter will be translated
# to sql as is, so you don't need to convert all functions.
translate_sql(regr_intercept(y, x), variant = postgres_var)
# <SQL> REGR_INTERCEPT("y", "x")

这个行为符合预期,就像其他2一样。

另一方面,默认翻译函数有效,请参阅:

translate_sql(mean(x), variant = postgres_var)
#<SQL> avg("x") OVER ()

这是一个错误吗?或者我错过了什么?

我的目标是为Oracle创建一些变体并以下列方式使用它,然后使用更复杂的函数(例如SQLite可重现):

con <- DBI::dbConnect(RSQLite::SQLite(), path = ":memory:")
copy_to(con, cars, "cars")
con %>% tbl("cars") %>% summarize(dist = group_concat(dist)) # works as expected, as we're stealing the keyword from sqlite directly
sqlite_variant <- sql_variant(aggregate=sql_translator(.parent = base_agg,gpc = sql_prefix("group_concat")))
con %>% tbl("cars") %>% summarize(dist = gpc(dist)) # how do I make this work ?

修改

之后的一个赏金仍然没有解决方案,我已经直接在dplyr / dbplyr github页面中直接发布了该问题,我不确定它是否会引起注意,但如果我(或其他人)未及时更新,请检查此网址:https://github.com/tidyverse/dplyr/issues/3117

1 个答案:

答案 0 :(得分:2)

这就是Hadley Wickham在提供的github链接上回答的问题:

  

translate_sql()不再有变量参数

确实,变量参数没有记录,尽管示例使用它,我想它将在下一版本中得到纠正。

询问如何定义他提供的自定义SQL翻译:

  

看看C11 6.2.8p6   和http://dbplyr.tidyverse.org/articles/new-backend.html

我想另一个选择是获取dbplyr::sql_variant的旧版本。