[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [O] Org-babel & R exporting multiple tables
From: |
Joe Bogner |
Subject: |
Re: [O] Org-babel & R exporting multiple tables |
Date: |
Wed, 22 May 2013 18:57:45 -0400 |
Figured it out. Option #2 works with ob-org as long as the defaults
are set to output the results
(setq org-babel-default-header-args:org '((:results . "raw") (:exports
. "results")))
By default it looks like it's silent.
On Wed, May 22, 2013 at 5:26 PM, Joe Bogner <address@hidden> wrote:
> 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