extras/dbplyr_show_query.md

dbply_query

Win-Vector LLC 3/7/2018

library("dplyr")
## 
## Attaching package: 'dplyr'

## The following objects are masked from 'package:stats':
## 
##     filter, lag

## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union
my_db <- DBI::dbConnect(RSQLite::SQLite(),
                        ":memory:")
dLocal <- data.frame(x = c(1,2))
dRemote <- dplyr::copy_to(my_db, dLocal, "dRemote")


dRemote %>% mutate(x = x + 1) %>% compute() %>% show_query()
## <SQL>
## SELECT *
## FROM `rdxkcbbsmw`
dRemote %>% mutate(x = x + 1) %>% compute() %>% dbplyr::remote_query()
## <SQL> SELECT *
## FROM `owvzwzltiz`
DBI::dbDisconnect(my_db)


WinVector/rquery documentation built on Aug. 24, 2023, 11:12 a.m.