动态计算参数值

Question

当我将参数传递给 #+begin_src 块时，有没有办法动态计算它们？

具体来说，我想将 :height 属性设置为依赖于我的 R 代码中的某些变量的值，如以下模型所示：

#+begin_src R
x <- 5
#+end_src

#+begin_src R :results graphics :file foo.svg :height (3*getvar('x'))
...draw picture here
#+end_src

其中 getvar() 的事情，以及随之而来的计算，也许是我的一厢情愿。

Answer 1

我不知道如何使用 org-mode 来做到这一点，但这已经是 knitr 包中的一个功能（Sweave 的替代品），所以如果您不介意 Sweave 语法，您可以使用：

<<>>=
x <- 5
<<foo, dev='svg', fig.height=3*x>>=
# draw plots here
@

有关 knitr 中的组织模式的更多信息：http://yihui.name/knitr/demo/org/

Answer 2

Org-mode 现在将标头规范中的括号解释为 elisp，因此您可以在中间使用一些 elisp 来执行此操作：

命名 R src 块

 #+name: default-height
 #+begin_src R
   x <- 300
 #+end_src

 #+results: default-height
 : 300

将 R 的结果作为 emacs 变量

#+begin_src emacs-lisp :var incoming = default-height :results silent
  (setq dh incoming)
#+end_src

在源块标头中使用 elisp

#+begin_src R :results graphics :file test.png :height (* dh 3)
  plot(rnorm(100))
#+end_src

#+results:
[[file:test.png]]

对我有用:)