Puis-je inclure avec élégance des chaînes SQL formatées dans un script R?

Question

Je travaille dans un script R qui utilise une longue chaîne SQL, et je voudrais garder la requête relativement libre d'autres balisages afin de permettre la copie et le collage entre les éditeurs et les applications. J'aimerais aussi pouvoir diviser la requête entre les lignes pour une meilleure lisibilité.

Dans la documentation RODBC, la fonction paste est utilisée pour générer la requête à partir de blocs distincts, mais je préfère quelque chose de moins kludgy et avec moins de guillemets et de virgules. Merci de votre aide.

Answer 1

vous pouvez remplacer le% +% opérateur d'avoir une meilleure chaîne concaténation syntaxe:

'%+%' <- 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") 

rendements:

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

Answer 2

Si vous êtes un ancien programmeur C de retour, comme je suis , vous pourriez aimer juste utiliser sprintf().

emprunt exemple de Ian:

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

rendements:

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

Answer 3

J'ai fini par frapper simplement la chaîne sql avec sql <- gsub("\n","",sql) et sql <- gsub("\t","",sql) avant de l'exécuter. La chaîne elle-même peut être aussi longue qu'elle doit l'être, mais reste libre de tout balisage de concaténation.

Answer 4

Je vous recommande d'utiliser simplement une chaîne de caractères sans incruster des valeurs de variables. Utilisez des espaces réservés à la place.

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

Je ne suis pas sûr si le guillemet est la meilleure façon d'intégrer les chaînes multi-lignes dans le code R (est là quelque chose comme ici-docs?), Mais il fonctionne, contrairement à Java.

Y a-t-il une raison pour laquelle vous ne voulez pas envoyer "\n" ou "\t" à votre base de données? Ils devraient être bien dans le SQL.

Answer 5

Une manière gracieuse de "y compris" une longue requête SQL est de le conserver dans un fichier séparé .sql. De préférence, quelque part, il peut être mis en évidence, un fichier texte dans RStudio fera l'affaire. Vous pouvez ensuite, dans votre script R principal, lire le fichier dans une chaîne et le remplir avec des variables en utilisant l'une des nombreuses solutions de type "named" sprintf, telles que 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)