Блестящий: BigQuery Не удается, когда пользователь выбирает значение «Все»

Question

Я пытаюсь использовать запрос BigQuery для заполнения участков в Shiny. Запрос включает входные значения из ui с помощью selectInput. Если пользователь выбирает значение, существующее в БД, например год 2014, запрос работает правильно, однако я бы хотел, чтобы пользователь также мог выбрать «Все». «Все» должно быть выбором всех значений, однако я не уверен, как выразить это в запросе с помощью selectInput.

server.r

data1 <- eventReactive(input$do_sql, { 
bqr_auth(token = NULL, new_user = FALSE, verbose = FALSE) 

query = paste('select month, event, partner_name, sum(f0_) from [dataset.table] where year =',input$year1,' and partner_name = \"',input$partner_name,'\" 
       GROUP by 1,2,3 
       ORDER by 1 asc 
       LIMIT 10000', sep="") 

bqr_query(projectId, datasetId, query, maxResults =2000) 
}) 

ui.r

( 
    selectInput("year1", 
       "Year:", 
       c("All",2014,2015 
       )) 
), 

(
    selectInput("partner_name", 
       "Partner:", 
       c("All", 
       unique(as.character(data5$partner_name)))) 

Answer 1

Вы должны немного изменить запрос, который вы строите
Таким образом, в настоящее время у вас есть

SELECT month, event, partner_name, SUM(f0_) 
FROM [dataset.table] 
WHERE year = selected_year 
AND partner_name = "selected_partner_name" 
GROUP BY 1,2,3 
ORDER BY 1 ASC 
LIMIT 10000 

с соответственно:

selected_year --> input$year1 
selected_partner_name --> input$partner_name 

Вместо этого, вы должны построить ниже запрос

SELECT month, event, partner_name, SUM(f0_) 
FROM [dataset.table] 
WHERE (year = selected_year OR "selected_year" = "All") 
AND (partner_name = "selected_partner_name" OR "selected_partner_name" = "All") 
GROUP BY 1,2,3 
ORDER BY 1 ASC 
LIMIT 10000 

Я не блестит пользователь вообще - так простите мой синтаксис - ниже только мое предположения в отношении части реализации выше предложения

query = paste('SELECT month, event, partner_name, sum(f0_) 
    FROM [dataset.table] 
    WHERE (year =',input$year1,' OR "All" ="',input$year1,'") 
    AND (partner_name = \"',input$partner_name,'\" OR "All" = \"',input$partner_name,'\") 
      GROUP by 1,2,3 
      ORDER by 1 asc 
      LIMIT 10000', sep="") 

Answer 2

Решение Михаэля отлично работало для символьных переменных, но численные показатели работали неправильно. Я решил использовать диапазон дат символа вместо того, чтобы изначально использовалось числовое число. Благодарю.