[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] sbe with :file header arg?
From: |
Myles English |
Subject: |
[O] sbe with :file header arg? |
Date: |
Fri, 07 Oct 2011 18:49:34 +0100 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/23.3 (gnu/linux) |
Hello,
I think I have one case of strange behaviour and one feature request, if it
isn't already possible.
I would like to make one plot per row of a table. This is useful because the
contents of the row may be parameters in an R session, and a link to the
resulting plot can be put in the last cell of each row.
The following source block makes a plot:
#+source: plotTest
#+headers: :var A="A" :var B="B" :var C="C"
#+begin_src R :file nofile.png :results graphics :session b
plot( 1,1, ylab=A, xlab=B)
text(0.8,0.8,C)
#+end_src
#+results: plotTest
[[file:nofile.png]]
and the source block may be called using this table:
#+TBLNAME: testtbl
| "5" | "X" | "Y" | nofile.png |
| 7 | P | "Q" | nofile.png |
#+TBLFM: $4='(sbe plotTest (A $1)(B $2)(C $3))
executing that shows up the strange behaviour because the R interpreter
contains:
> > png(filename="nofile.png")
> A <- "5"
> B <- "X"
> C <- "Y"
> plot( 1,1, ylab=A, xlab=B)
> text(0.8,0.8,C)
> dev.off()
null device
1
> > png(filename="nofile.png")
> A <- 7
> B <- "/home/myles/org/org/nofile.png" <------ STRANGE, NO?
> C <- "Q"
> plot( 1,1, ylab=A, xlab=B)
> text(0.8,0.8,C)
> dev.off()
null device
1
Now the feature request; would it be possible to pass a :file header
based on a value in the table, like this?
#+TBLNAME:testtwo
| a.png | "G" | "E" | "F" | [[img/a.png]] |
#+TBLFM: $4='(sbe plotTest[:file img/$1] (A $2)(B $3)(C $4))
Thanks,
Myles
- [O] sbe with :file header arg?,
Myles English <=