From mboxrd@z Thu Jan  1 00:00:00 1970
From: Daimrod <daimrod@gmail.com>
Subject: Re: How to write a org babel hook, which can manupulate result
Date: Thu, 27 Mar 2014 11:44:28 +0900
Message-ID: <87r45o7437.fsf@tanger.home>
References: <87ha6lje04.fsf@news.tumashu-localhost.org>
	<87k3bh84ry.fsf@tanger.home>
	<8761n0jyio.fsf@news.tumashu-localhost.org>
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]:60807)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <daimrod@gmail.com>) id 1WT0J5-0007Re-PS
	for emacs-orgmode@gnu.org; Wed, 26 Mar 2014 22:44:40 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <daimrod@gmail.com>) id 1WT0J1-00007W-BU
	for emacs-orgmode@gnu.org; Wed, 26 Mar 2014 22:44:39 -0400
Received: from mail-pd0-x234.google.com ([2607:f8b0:400e:c02::234]:60331)
	by eggs.gnu.org with esmtp (Exim 4.71)
	(envelope-from <daimrod@gmail.com>) id 1WT0J1-000077-3D
	for emacs-orgmode@gnu.org; Wed, 26 Mar 2014 22:44:35 -0400
Received: by mail-pd0-f180.google.com with SMTP id v10so2726047pde.11
	for <emacs-orgmode@gnu.org>; Wed, 26 Mar 2014 19:44:33 -0700 (PDT)
In-Reply-To: <8761n0jyio.fsf@news.tumashu-localhost.org> (Feng Shu's message
	of "Thu, 27 Mar 2014 08:06:23 +0800")
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

Feng Shu <tumashu@gmail.com> writes:

> 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,

I don't think you can.

You have to use it this way (not tested):

#+NAME: align-multi-table
#+BEGIN_SRC emacs-lisp :var content="nil" :results raw
  (align-multi-table content)
#+END_SRC
#+begin_src R :results output raw drawer :post align-multi-table(content=*this*)
  <content>
#+end_src

> 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:

-- 
Daimrod/Greg