Kann ich formatierte SQL-Zeichenfolgen in einem R-Skript enthalten?

Question

Ich arbeite in einem R-Skript, das eine lange SQL-Zeichenfolge verwendet, und ich möchte die Abfrage relativ frei von anderen Markup, um Kopieren und Einfügen zwischen Editoren und Anwendungen zu ermöglichen. Ich möchte auch die Fähigkeit, die Abfrage für bessere Lesbarkeit über mehrere Zeilen zu teilen.

In der RODBC-Dokumentation wird die paste-Funktion verwendet, um die Abfrage aus separaten Blöcken zu erstellen, aber ich würde etwas weniger kludgy und mit weniger Anführungszeichen und Kommas bevorzugen. Danke für Ihre Hilfe.

Answer 1

Sie das% +% Operator überschreiben können besser Zeichenfolge Verketten Syntax zu haben:

'%+%' <- function(x,y) paste(x,y,sep="") 

y<-"y1" 
x<-"somethingorother" 
query<- 
'SELECT DISTINCT x AS ' %+% x %+%',\n' %+% 
'    y AS ' %+% y %+% '\n' %+% 
' FROM tbl 
WHERE id=%s 
AND num=%d' 

cat(query,"\n") 

ergibt:

> cat(query,"\n") 
SELECT DISTINCT x AS somethingorother, 
       y AS y1 
FROM tbl 
WHERE id=%s 
AND num=%d 

Answer 2

Wenn Sie einen alten C-Programmierer aus Weg zurück sind, wie ich bin , könnte es Ihnen Spaß machen, einfach sprintf() zu benutzen.

Borrowing Ians Beispiel:

y<-"y1" 
x<-"somethingorother" 
query <- sprintf(
'SELECT DISTINCT x AS %s, 
       y AS %s, 
FROM tbl 
WHERE id=%%s 
AND num=%%d', x, y) 

ergibt:

> cat(query,"\n") 
SELECT DISTINCT x AS somethingorother, 
       y AS y1, 
FROM tbl 
WHERE id=%s 
AND num=%d 

Answer 3

Ich habe einfach die SQL-Zeichenfolge mit sql <- gsub("\n","",sql) Schlagen endete und sql <- gsub("\t","",sql), bevor es ausgeführt wird. Die Zeichenfolge selbst kann so lang sein, wie sie sein muss, aber sie bleibt frei von allen Verkettungsmarkierungen.

Answer 4

Ich würde empfehlen, nur eine einfache Zeichenfolge zu verwenden und keine Variablenwerte einzubetten. Verwenden Sie stattdessen Platzhalter.

sql <- "SELECT foo FROM bar 
    WHERE col1 = ? 
    AND col2 = ? 
    ORDER BY yomama" 

Ich bin mir nicht sicher, ob das doppelte Anführungszeichen ist der beste Weg, mehrzeiligen Strings in R-Code zum Einbetten (gibt es so etwas wie hier-docs?), Aber es funktioniert, anders als in Java.

Gibt es einen Grund, warum Sie keine "\n" oder "\t" an Ihre Datenbank senden möchten? Sie sollten in der SQL in Ordnung sein.

Answer 5

Ein graziöser Weg "einschließlich" eine lange SQL-Abfrage ist es in einer separaten .sql Datei zu halten. Vorzugsweise kann irgendwo eine Syntax hervorgehoben werden, eine Textdatei in RStudio erledigt die Aufgabe. Sie können dann in Ihrem Haupt-R-Skript die Datei in eine Zeichenfolge lesen und sie mit Variablen auffüllen, indem Sie eine der vielen "benannten" sprintf-Typ-Lösungen verwenden, beispielsweise infuser.

.SQL

select * 
from mytable 
where id = {{a}} 
and somevar = {{b}} 

.R

library(readr) 
library(infuser) 

query <- read_file("query.sql") %>% 
     infuse(a = 1, b = 2)