From mboxrd@z Thu Jan  1 00:00:00 1970
From: Feng Shu <tumashu@gmail.com>
Subject: Re: How to write a org babel hook, which can manupulate result
Date: Thu, 27 Mar 2014 08:06:23 +0800
Message-ID: <8761n0jyio.fsf@news.tumashu-localhost.org>
References: <87ha6lje04.fsf@news.tumashu-localhost.org>
	<87k3bh84ry.fsf@tanger.home>
Mime-Version: 1.0
Content-Type: text/plain
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:51363)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <geo-emacs-orgmode@m.gmane.org>) id 1WSxyt-0003vG-Fu
	for emacs-orgmode@gnu.org; Wed, 26 Mar 2014 20:15:46 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <geo-emacs-orgmode@m.gmane.org>) id 1WSxyl-0007lv-Ga
	for emacs-orgmode@gnu.org; Wed, 26 Mar 2014 20:15:39 -0400
Received: from plane.gmane.org ([80.91.229.3]:49888)
	by eggs.gnu.org with esmtp (Exim 4.71)
	(envelope-from <geo-emacs-orgmode@m.gmane.org>) id 1WSxyl-0007lm-A1
	for emacs-orgmode@gnu.org; Wed, 26 Mar 2014 20:15:31 -0400
Received: from list by plane.gmane.org with local (Exim 4.69)
	(envelope-from <geo-emacs-orgmode@m.gmane.org>) id 1WSxyk-0005KN-Ed
	for emacs-orgmode@gnu.org; Thu, 27 Mar 2014 01:15:30 +0100
Received: from 120.4.232.126 ([120.4.232.126])
	by main.gmane.org with esmtp (Gmexim 0.1 (Debian))
	id 1AlnuQ-0007hv-00
	for <emacs-orgmode@gnu.org>; Thu, 27 Mar 2014 01:15:30 +0100
Received: from tumashu by 120.4.232.126 with local (Gmexim 0.1 (Debian))
	id 1AlnuQ-0007hv-00
	for <emacs-orgmode@gnu.org>; Thu, 27 Mar 2014 01:15:30 +0100
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=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

Daimrod <daimrod@gmail.com> writes:

> Feng Shu <tumashu@gmail.com> writes:
>
>> Hi:
> Hi Feng,
>
> Look at the :post header argument.
> (info "(org) post")

How to use elisp in :post directly,
for example:

#+begin_src R :results output raw drawer :post (align-multi-table)
  <content>
#+end_src

#+begin_comment
(defun align-multi-table (&optional content)
  (interactive)
  (let ((content (or content *this*)))
    (with-temp-buffer
      (insert content)
      (goto-char (point-min))
      (while (not (eobp))
	(when (org-at-table-p)
	  (org-table-align))
	(forward-line))
      (buffer-string))))
#+end_comment

>
>> I want to write a hook to menupulate org babel output,
>> The problem is: How can I get two points info: [pointA] and [pointB]
>> in my hook function?
>>
>> #+begin_src R :results output raw drawer
>> tbl <- data.frame(a=c(1,2,3),b=c(3,2,1))
>> print(ascii(tbl),type="org")
>> #+END_SRC
>>
>> #+RESULTS:
>> :RESULTS:
>> [pointA]
>> |   |    a |    b |
>> |---+------+------|
>> | 1 | 1.00 | 3.00 |
>> | 2 | 2.00 | 2.00 |
>> | 3 | 3.00 | 1.00 |
>> [pointB]
>> :END:

--