Jack Tanner wrote:
Sundar Dorai-Raj wrote:
Not sure about what sqlQuery is doing but you can wrap your return value in a eval(parse(text = x)) to evaluate the "as.integer(.)" string. As in,
a <- eval(parse(text = a))
This works, except it doesn't.
> a <- sqlQuery(irrdb, "select count(field) from mytable where field=1") > print(a) count(field) 1 8 > paste(a) [1] "as.integer(8)" > eval(parse(text=a)) [1] 8 > paste(eval(parse(text=a))) [1] "8"
That's great, but... > paste(list(eval(parse(text=a)), eval(parse(text=a)))) [1] "as.integer(8)" "as.integer(8)"
Argh!!! What the hell is going on?
I think you meant
paste(c(eval(parse(text=a)), eval(parse(text=a))))
or
do.call("paste", list(eval(parse(text=a)), eval(parse(text=a))))Not sure which you want.
Or better yet, if `a' is a vector:
a <- c(a, a, a, a)
b <- lapply(a, function(x) eval(parse(text = x)))
# I seem to recall you needing to create an HTML table
do.call("paste", c(b, sep = "</td><td>"))
# or
paste(unlist(b), collapse = "</td><td>")--sundar
______________________________________________ [EMAIL PROTECTED] mailing list https://www.stat.math.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
