Another way:
cat("Station number?")
flush.console()
sn <- scan(quiet=TRUE,n=1)
sqlQuery(conn, paste("select to_char(lsd,'yyyy-mm') as yr,ttl_mo_prcp from
mo_rains where stn_num=",sn,sep=""))
Bart
--
View this message in context: http://n4.nabble.com/sql-query-variable-tp1558189p1558504.html
Sent from the R help mailing list archive at Nabble.com.