r - 如何将所有转义字符保留在 SQL 字符串中以使用 R 查询 POSTGRES 数据库？

Question

我正在使用 R 从 Postgres 数据库中查询数据。我在 pgAdmin3 中创建的查询中有很多转义字符，我将提取整个 SQL 字符串，而不必再次处理转义字符，类似于 Python 的三重引号“””。

SELECT brand
,regexp_replace(upper(hybridtype), '\(.*\)|\/|-|TM|\s','','g') as hybrid
FROM seeds

如何将 SQL 文本导入 R 并保留所有字符？

Answer 1

在 PGAdmin 中，将文本复制到剪贴板。 然后在 R 中:

  sql_qry <- clipPaste()

其中clipPaste定义如下:

clipPaste <- function(flat=TRUE) {
    con <- pipe("pbpaste", open = "rb")
    ret <- readLines(con, warn = FALSE)
    if (flat)
        ret <- paste0(ret, collapse = "\n")
    close(con)
    return(ret)
}

所有字符都将被适本地转义。