R + 组织模式 : how to avoid naming plot files?

Question

当我使用Sweave时与 R ，我可以通过简单地将绘图命令包含在像 <<fig=TRUE>> ... @ 这样的代码块中来避免显式命名绘图文件。 。 Sweave驱动程序自动生成编号绘图文件，例如 fig1.pdf , fig2.pdf等

但是在 org-mode ，似乎我需要使用 :file [...].pdf 显式命名图形文件在标题中，例如

#+attr_latex: width=8cm placement=[htbp]
#+begin_src R :results output graphics :exports results :file fig.pdf                                                                                                                                                                                                 
    require(ggplot2)                                                                                                                           
    a <- rnorm(100)                                                                                                                            
    b <- 2*a + rnorm(100)                                                                                                                      
    d <- data.frame(a,b)                                                                                                                       
    ggplot(d,aes(a,b)) + geom_point()                                                                                                          
#+end_src                                     

是否有某种方法可以避免显式命名绘图文件，并让组织模式 latex 导出引擎生成这些文件名？

更新:我在此处包含了 G. Jay Kerns 指出的解决方案以方便引用:您所需要做的就是在 header 中包含一个生成临时文件的 emacs-lisp 函数，例如:file (org-babel-temp-file "./figure-" ".pdf") 。这会在当前目录中创建一个临时图形文件(因为 ./ )。如果您想要全局临时目录中的临时图形文件(由变量 org-babel-temporary-directory 定义)，则只需说 ".figure" :

#+attr_latex: width=8cm placement=[htbp]
#+begin_src R :results output graphics :exports results :file (org-babel-temp-file "./figure-" ".pdf")                                                                                                                                                                                                 
    require(ggplot2)                                                                                                                           
    a <- rnorm(100)                                                                                                                            
    b <- 2*a + rnorm(100)                                                                                                                      
    d <- data.frame(a,b)                                                                                                                       
    ggplot(d,aes(a,b)) + geom_point()                                                                                                          
#+end_src                                     

Answer 1

很好的问题，九月份的组织模式邮件列表中也出现了一个类似的问题(加上一些额外的内容)。原问题是here ，并且可能的解决方案的草图位于线程的最终消息 here 中。 (参见#1，其他项目是关于其他事情的)。