我可以在R脚本中优雅地包含格式化的SQL字符串吗？

我正在使用一个使用长SQL字符串的R脚本,我希望保持查询相对没有其他标记,以便允许在编辑器和应用程序之间进行复制和粘贴.我还希望能够跨行分割查询以提高可读性.

在RODBC文档中,粘贴函数用于从单独的块中构建查询,但我更喜欢一些不那么笨拙且引号和逗号较少的内容.谢谢你的帮助.

解决方法

您可以覆盖%%运算符以获得更好的字符串连接语法：

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

收益率：

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