dbSendPreparedQuery in RSQLite

How do we send prepared queries in RSQLite. We are interested in  
something along the lines of

ps = dbSendPreparedQuery(conn, "SELECT * FROM table1 WHERE chr = ?",  
data.frame("integer"))
for( i in 1:2)
   rs = dbGetPreparedQuery(ps, i)

In C it would look something along the lines of
http://www.mail-archive.com/sqlite-users at sqlite.org/msg31854.html

Thanks
Jim