0

私はコードを実行しようとしています:

サーバーに接続する

library('RPostgreSQL', quietly = TRUE)
kHostName  <- '...'
kPort      <- '5432'
kDBName    <- '...'
kUser      <- '...'
kPassword  <- '...'

drv <- dbDriver("PostgreSQL")
con <- dbConnect(drv,
                 host      = kHostName,
                 port      = kPort,
                 dbname    = kDBName,
                 user      = kUser,
                 password  = kPassword)

コードの次の部分は、 https://groups.google.com/forum/#!topic/ rpostgresql- dev/lPPmS8yeP9wおよびhttps://github.com/codeinthehole/rpostgresql/blob/master/RPostgreSQL/testsから取得したものです。 /bytea.R

dbGetQuery(con,"CREATE TABLE byteatable (name text NOT NULL, val bytea, 
PRIMARY KEY (name))") 
sample.object <- list("one","two"); 
ser <- serialize(sample.object,NULL,ascii=F); 
postgresqlEscapeBytea(con, ser) 
iq <- sprintf("INSERT INTO byteatable values('%s',E'%s');","name1", postgresqlEscapeBytea(con, ser)) 
dbGetQuery(con, iq) 
rows<-dbGetQuery(con, "SELECT * from byteatable") 
ser2<-postgresqlUnescapeBytea(rows[[2]])

戻り値:

Error: could not find function "postgresqlEscapeBytea"

どうすればそれを機能させることができますか？

私が使う：

> version
               _                           
platform       x86_64-apple-darwin13.4.0   
arch           x86_64                      
os             darwin13.4.0                
system         x86_64, darwin13.4.0        
status                                     
major          3                           
minor          3.0                         
year           2016                        
month          05                          
day            03                          
svn rev        70573                       
language       R                           
version.string R version 3.3.0 (2016-05-03)
nickname       Supposedly Educational
4

1 に答える 1

0

この関数は、私が知る限りpostgresqlUnescapeBytea、パッケージの開発バージョンでのみ利用できます。これは、 https ://github.com/codeinthehole/rpostgresql からダウンロードできます。RpostgreSQL

于 2017-02-28T12:11:47.987 に答える