Nothing
test_that("custom scalar translated correctly", {
local_con(simulate_odbc())
expect_equal(test_translate_sql(as.numeric(x)), sql("CAST(`x` AS DOUBLE)"))
expect_equal(test_translate_sql(as.double(x)), sql("CAST(`x` AS DOUBLE)"))
expect_equal(test_translate_sql(as.integer(x)), sql("CAST(`x` AS INT)"))
expect_equal(test_translate_sql(as.character(x)), sql("CAST(`x` AS STRING)"))
})
test_that("custom aggregators translated correctly", {
local_con(simulate_odbc())
expect_equal(
test_translate_sql(sd(x, na.rm = TRUE), window = FALSE),
sql("STDDEV_SAMP(`x`)")
)
})
test_that("custom window functions translated correctly", {
local_con(simulate_odbc())
expect_equal(
test_translate_sql(sd(x, na.rm = TRUE)),
sql("STDDEV_SAMP(`x`) OVER ()")
)
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.