RPostgreSQL (डेटा डालने के लिए) के साथ पैरामीटर का उपयोग कैसे करें

Question

मैं RPostgreSQL का उपयोग कर पूर्व-मौजूदा PostgreSQL तालिका में डेटा डालने का प्रयास कर रहा हूं और मैं SQL पैरामीटर (तैयार कथन) के लिए वाक्यविन्यास नहीं समझ सकता।

उदा। लगता है मैं निम्नलिखित

insert into mytable (a,b,c) values ($1,$2,$3)

मैं कैसे पैरामीटर निर्दिष्ट करते करना चाहते हैं? dbSendQuery समझ में नहीं आता है अगर आप केवल ... में पैरामीटर डालते हैं।

मुझे मिला है dbWriteTable का उपयोग पूरे टेबल को डंप करने के लिए किया जा सकता है, लेकिन आपको कॉलम निर्दिष्ट नहीं करने देगा (इसलिए डिफ़ॉल्ट आदि के लिए कोई अच्छा नहीं)। और वैसे भी, मुझे वहां डेटा प्राप्त करने के बाद अन्य प्रश्नों के लिए यह जानना होगा (इसलिए मुझे लगता है कि यह वास्तव में विशिष्ट नहीं है)!

ज़रूर मैं बस कुछ स्पष्ट याद कर रहा हूँ ...

Answer 1

मैं एक ही बात के लिए देख रहा था, एक ही कारण है, जो सुरक्षा के लिए है।

स्पष्ट रूप से dplyr पैकेज में आपकी क्षमता है जिसकी आप रुचि रखते हैं। यह शायद ही कभी दस्तावेज है, लेकिन यह वहां है। इस विग्नेट में "पोस्टग्रेस्क्ल" तक नीचे स्क्रॉल करें: http://cran.r-project.org/web/packages/dplyr/vignettes/databases.html

सारांशित करने के लिए, dplyr कार्यों को sql() और escape() प्रदान करता है, जिसे पैरामीट्रिज्ड क्वेरी बनाने के लिए जोड़ा जा सकता है। डीबीआई पैकेज से एसक्यूएल() फ़ंक्शन बिल्कुल उसी तरह काम करता प्रतीत होता है।

> sql(paste0('SELECT * FROM blaah WHERE id = ', escape('random "\'stuff'))) 
<SQL> SELECT * FROM blaah WHERE id = 'random "''stuff' 

यह वर्ग "एसक्यूएल" और "चरित्र" का एक उद्देश्य देता है, तो आप या तो इसे tbl को भेज देगा() या संभवतः dbSendQuery() के रूप में अच्छी तरह से कर सकते हैं।

बच() फ़ंक्शन सही ढंग से और साथ ही वैक्टर संभालती है, जो मैं सबसे उपयोगी लगते हैं:

> sql(paste0('SELECT * FROM blaah WHERE id in ', escape(1:5))) 
<SQL> SELECT * FROM blaah WHERE id in (1, 2, 3, 4, 5) 

ही स्वाभाविक रूप से चर के साथ काम करता है:

> tmp <- c("asd", 2, date()) 
> sql(paste0('SELECT * FROM blaah WHERE id in ', escape(tmp))) 
<SQL> SELECT * FROM blaah WHERE id in ('asd', '2', 'Tue Nov 18 15:19:08 2014') 

मैं अब ज्यादा सुरक्षित महसूस एक साथ डाल प्रश्नों।

Answer 2

नवीनतम RPostgreSQL के रूप में यह काम करना चाहिए:

db_connection <- dbConnect(dbDriver("PostgreSQL"), dbname = database_name, 
        host = "localhost", port = database_port, password=database_user_password, 
        user = database_user) 
qry = "insert into mytable (a,b,c) values ($1,$2,$3)" 
dbSendQuery(db_connection, qry, c(1, "some string", "some string with | ' "))