如何将所有转义字符保存在 SQL 字符串中以使用 R 查询 POSTGRES 数据库?
How do I keep all escape characters in a SQL string for querying a POSTGRES DB using R?
我正在使用 R 从 Postgres 数据库中查询数据。我在 pgAdmin3 中创建的查询中有很多转义字符,我想拉入整个 SQL 字符串,而不必再次处理转义字符 ,类似Python 的三重引号 """.
SELECT brand
,regexp_replace(upper(hybridtype), '\(.*\)|\/|-|TM|\s','','g') as hybrid
FROM seeds
如何将 SQL 文本输入 R 并保留所有字符?
在 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)
}
所有字符都将被适当地转义。
我正在使用 R 从 Postgres 数据库中查询数据。我在 pgAdmin3 中创建的查询中有很多转义字符,我想拉入整个 SQL 字符串,而不必再次处理转义字符 ,类似Python 的三重引号 """.
SELECT brand
,regexp_replace(upper(hybridtype), '\(.*\)|\/|-|TM|\s','','g') as hybrid
FROM seeds
如何将 SQL 文本输入 R 并保留所有字符?
在 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)
}
所有字符都将被适当地转义。