Org-babel & R exporting multiple tables

[Joe Bogner <joebogner@gmail.com>]

I have a list of data frames that I would like to output. The number
of frames may vary

Is there a way to export multiple tables formatted? These are the
three options I came up with. None of them work very well:

Option #3 works the best, but it will append each time it's run in the
doc, so I can't have the contents in the doc without having it
duplicated.

Option #2 would be good if I could just instruct it to render the table as HTML

There was a post about 2 years ago that I attempted implement by
adding (require 'ob-org) to my .emacs for #2 but it didn't seem to
work (http://article.gmane.org/gmane.emacs.orgmode/29286/match=results+org+babel+ascii).



* Option 1

Will combine the frames

#+begin_src R :session *R* :colnames yes
frames <- list()
frames[[1]] <- data.frame(col=c("a","b"))
frames[[2]] <- data.frame(col2=c("a","b"))
frames
#+end_src

#+RESULTS:
| col | col2 |
|-----+------|
| a   | a    |
| b   | b    |



* Option 2

It won't format on export

#+begin_src R :session *R* :results output org :exports both
frames <- list()
frames[[1]] <- data.frame(col=c("a","b"))
frames[[2]] <- data.frame(col2=c("a","b"))
for(i in 1:2) {
    print(ascii(frames[[i]]), type="org")
cat("\n")
}
#+end_src

#+RESULTS:
#+BEGIN_SRC org
 |   | col |
 |---+-----|
 | 1 | a   |
 | 2 | b   |

|   | col2 |
|---+------|
| 1 | a    |
| 2 | b    |
#+END_SRC


* Option 3

It will format on export but won't replace if it's run in the document

#+begin_src R :session *R* :results output raw :exports both
frames <- list()
frames[[1]] <- data.frame(col=c("a","b"))
frames[[2]] <- data.frame(col2=c("a","b"))
for(i in 1:2) {
    print(ascii(frames[[i]]), type="org")
cat("\n")
}
#+end_src