以下のコードは以下を出力します。
SELECT "district_code" FROM sd_stage.table1 GROUP BY "district_code"
しかし、私は期待しています:
select distinct(district_code) from sd_stage.table1
コード:
library(DBI)
library(tidyverse)
library(dbplyr)
conn_obj <- DBI::dbConnect(RPostgreSQL::PostgreSQL(),
host = "127.0.0.1",
user = "testingdb",
password = "admin@123")
on.exit(DBI::dbDisconnect(conn_obj))
tbl_oil_root_segment <- dplyr::tbl(conn_obj,
dbplyr::in_schema('sd_stage','table1'))
tbl_oil_root_segment %>% distinct(oil_district) %>% show_query()
出力は正しいですが、生成されるクエリは 100% ではないようです。とにかくクエリを実装できますか?