From: Carsten Dominik <dominik@science.uva.nl>
To: Eric Schulte <schulte.eric@gmail.com>
Cc: emacs-orgmode@gnu.org
Subject: Re: graphing from org-tables
Date: Fri, 23 Jan 2009 08:30:31 +0100 [thread overview]
Message-ID: <0696199E-F0FC-4597-9705-B1660D208325@uva.nl> (raw)
In-Reply-To: <87y6x2ssz4.fsf@gmail.com>
On Jan 23, 2009, at 2:37 AM, Eric Schulte wrote:
> Dan Davison <davison@stats.ox.ac.uk> writes:
>
>> On Mon, Dec 22, 2008 at 12:00:14PM -0500, Eric Schulte wrote:
>>> Hi Dan,
>>>
>>
>> <...>
>>
>>> 2) Also interesting is the idea of referencing a table from a
>>> block of R
>>> code elsewhere in the org file. I've worked some on processing
>>> blocks of R code in org files in a manner similar to Sweave.
>>> http://github.com/eschulte/org-contrib/tree/master/org-exp-blocks.el
>>> If we could implement a simple means of referencing tables (either
>>> whole tables, or cells/cols/rows of tables) from these R-code
>>> blocks
>>> then that seems like it may be fairly powerful.
>>
>> I agree with this. So in the case of my code, I think we would like
>> to
>> be able to do something like
>>
>> #+TBLR: data:<org-table-reference> columns:(1 2) action:tabulate
>>
>> This would make the output of the analysis/plot of the table pointed
>> to by <org-table-reference> appear at the location in the file of the
>> #+TBLR line. Perhaps one design aim would be to have the same
>> mechanism work for referencing tables for processing by #TBLFM,
>> org-plot, org-table-R, org-exp-blocks, etc.
>
> That sounds like a very good idea. A uniform interface for
> referencing
> table ranges (either globally from outside of the table or locally
> from
> within the table) that could be used for any table formula be it in
> calc, R, elisp, etc... I find the idea of easily accessing and
> writing
> table data from external tools very intriguing
For what it is worth, here is a function that will grab a field value
or a range from a remote table, be it in the current file or in a
different file. That is not yet a syntax to have such a reference
in a formula, but it is the most important component, and maybe it will
already be useful for you.
This function uses an entry ID to access the table - obviously
other schemes like table naming could be used.
It is not going to be very fast, and multiple accesses
to the same remote table would each cause the same overhead,
but it sure is working.
- Carsten
(defun org-table-remote-range (id form
&optional replace keep-empty numbers lispp)
"Get a field value or a list of values in a range from table at ID.
ID refers to an entry, and the first table in that entry is the one
being looked at.
FORM is a field or range descriptor like \"@2$3\" or \"@I$2..@II$2\".
All the references must be absolute, not relative.
When REPLACE is non-nil, the return value will be a string in which
the field
descriptor has been replaced, according to the flags KEEP-EMPTY,
NUMBERS, and
LISPP. These flags correspond to the E and N flags, and to the fact
if the
formula is a lisp formula, not a calc formula.
When REPLACE is nil, a single string or a list of strings is returned,
with with the content(s) of the referenced field(s)."
(save-match-data
(let ((id-loc (org-id-find id 'marker))
org-table-column-names org-table-column-name-regexp
org-table-local-parameters org-table-named-field-locations
org-table-current-line-types org-table-current-begin-line
org-table-current-begin-pos org-table-dlines
org-table-hlines org-table-last-alignment
org-table-last-column-widths org-table-last-alignment
org-table-last-column-widths tbeg rtn)
(save-excursion
(switch-to-buffer (marker-buffer id-loc))
(save-excursion
(save-restriction
(widen)
(goto-char id-loc)
(forward-char 1)
(unless (and (re-search-forward "^\\(\\*+ \\)\\|[ \t]*|" nil t)
(not (match-beginning 1)))
(error "Cannot find a table at ID %s" id))
(setq tbeg (point-at-bol))
(org-table-get-specials)
(when (and (string-match org-table-range-regexp form)
(> (length (match-string 0 form)) 1))
(save-match-data
(setq rtn (org-table-get-range
(match-string 0 form) tbeg 1))))
(if replace
(replace-match
(save-match-data
(org-table-make-reference rtn keep-empty numbers lispp))
t t form)
rtn)))))))
next prev parent reply other threads:[~2009-01-23 7:30 UTC|newest]
Thread overview: 19+ messages / expand[flat|nested] mbox.gz Atom feed top
2008-07-25 15:53 graphing from org-tables Eric Schulte
2008-07-25 16:23 ` Carsten Dominik
2008-07-25 16:25 ` James TD Smith
2008-07-25 16:33 ` Carsten Dominik
2008-07-25 17:14 ` Eric Schulte
2008-07-25 19:07 ` Eric Schulte
2008-07-26 18:15 ` Dan Davison
2008-07-28 15:32 ` Eric Schulte
2008-07-28 15:41 ` Dan Davison
2008-12-21 20:31 ` Dan Davison
2008-12-22 17:00 ` Eric Schulte
2009-01-22 16:27 ` Dan Davison
2009-01-23 1:37 ` Eric Schulte
2009-01-23 7:30 ` Carsten Dominik [this message]
2009-01-26 8:53 ` Carsten Dominik
2009-01-28 3:06 ` Dan Davison
2009-01-28 10:18 ` Carsten Dominik
[not found] ` <C8C13077-8B16-4E8C-8425-5782CE1EDC98@uva.nl>
[not found] ` <488b7c9b.14be600a.11cc.ffff9150@mx.google.com>
[not found] ` <9629760B-7606-42FD-B625-FAC44490221C@uva.nl>
2008-07-28 14:26 ` Eric Schulte
2008-07-28 21:00 ` Carsten Dominik
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=0696199E-F0FC-4597-9705-B1660D208325@uva.nl \
--to=dominik@science.uva.nl \
--cc=emacs-orgmode@gnu.org \
--cc=schulte.eric@gmail.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).