From mboxrd@z Thu Jan 1 00:00:00 1970 From: tsd@tsdye.com (Thomas S. Dye) Subject: [Babel] Header arguments Date: Fri, 13 May 2011 16:56:51 -1000 Message-ID: Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Return-path: Received: from eggs.gnu.org ([140.186.70.92]:34963) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QL52I-00009c-ED for emacs-orgmode@gnu.org; Fri, 13 May 2011 22:56:59 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1QL52H-0005j2-7K for emacs-orgmode@gnu.org; Fri, 13 May 2011 22:56:58 -0400 Received: from oproxy3-pub.bluehost.com ([69.89.21.8]:57458) by eggs.gnu.org with smtp (Exim 4.71) (envelope-from ) id 1QL52H-0005il-0E for emacs-orgmode@gnu.org; Fri, 13 May 2011 22:56:57 -0400 Received: from cpe-24-94-66-191.hawaii.res.rr.com ([24.94.66.191] helo=potofo-ou) by box472.bluehost.com with esmtpa (Exim 4.69) (envelope-from ) id 1QL52D-0000H7-VY for emacs-orgmode@gnu.org; Fri, 13 May 2011 20:56:54 -0600 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org Aloha all, I have a little function that graphs two 14C dates (below). The data are held in tables produced by a software package that I access on the web. I read these into Org-mode and give them a #+tblname:, as shown below. I'd like to have one function that will graph any number of tables but I don't know how to package up the table references and get them inside the function. If I put them in a table, they end up as strings inside the function. I suspect I'm being thick about this. Can someone give me a pointer to how this might be done? All the best, Tom #+tblname: theta-one-no-rat | cal BP | Posterior probability | |--------+-----------------------| | -1520 | 1.8353001633417145E-5 | ... **** Two dates #+srcname: two-dated-events #+header: :file ~/org/tsdye/two-dates.pdf #+header: :var xlab="theta_1" #+header: :var x=theta-one-no-rat #+header: :var ylab="theta_4" #+header: :var y=theta-four-no-rat #+header: :width 6 :height 4 :results output graphics #+begin_src R library(ggplot2) res <- data.frame(cal.BP=numeric(0),Posterior.probability=numeric(0),label=character(0)) res <- rbind(res,cbind(x,label=rep(xlab,dim(x)[1]))) res <- rbind(res,cbind(y,label=rep(ylab,dim(y)[1]))) theme_set(theme_bw(base_size=11)) g <- ggplot(res, aes(x=1950 + cal.BP, y=Posterior.probability)) g + geom_bar(stat='identity') + xlab("Year AD") + ylab("Probability") + facet_wrap(~ label) #+end_src -- Thomas S. Dye http://www.tsdye.com