From: Cecil Westerhof <cldwesterhof@gmail.com>
To: emacs-orgmode@gnu.org
Subject: Re: Difference between two rows
Date: Sun, 1 Jun 2014 16:12:57 +0200 [thread overview]
Message-ID: <CAG-LmmCD+TO6sa6qxp2CziVJNVY-gxDGNBX8wP1jxsq9L4_FKw@mail.gmail.com> (raw)
In-Reply-To: <CALn3zoiRB8E2UaCstKqKvnKx7ENh1nq25=JgPF9uK7PGjG5_HQ@mail.gmail.com>
[-- Attachment #1: Type: text/plain, Size: 5663 bytes --]
2014-06-01 15:18 GMT+02:00 Michael Brand <michael.ch.brand@gmail.com>:
> Hi Cecil
>
> On Sun, Jun 1, 2014 at 2:24 PM, Cecil Westerhof <cldwesterhof@gmail.com>
> wrote:
> > But what if I would want to know the
> > difference between the previous filled one, divided by the distance?
> >
> > For example:
> > |-------+------------|
> > | value | difference |
> > |-------+------------|
> > | 12 | |
> > | 15 | 3 |
> > | | |
> > | 83 | 34 |
> > | | |
> > | | |
> > | | |
> > | 87 | 1 |
> > | | |
> > | | |
> > | | |
> > | 85 | -0.5 |
> > | | |
> > |-------+------------|
>
> More as a demonstration of what Calc can do, divided up into some
> intermediate steps:
>
> |-------+---------------------------------------------------------|
> | value | difference |
> |-------+---------------------------------------------------------|
> | 12 | |
> | 15 | [15, 12] |
> | | |
> | 83 | [83, nan, 15, 12] |
> | | |
> | | |
> | | |
> | 87 | [87, nan, nan, nan, 83, nan, 15, 12] |
> | | |
> | | |
> | | |
> | 85 | [85, nan, nan, nan, 87, nan, nan, nan, 83, nan, 15, 12] |
> | | |
> |-------+---------------------------------------------------------|
> #+TBLFM: $2 = if(vlen(@-I$1..@0$1) == 1 || "$1" == "nan", string(""),
> rev(@-I$1..@0$1)); E
>
> |-------+----------------------------------------------------|
> | value | difference |
> |-------+----------------------------------------------------|
> | 12 | |
> | 15 | [0, 0] |
> | | |
> | 83 | [0, nan, 0, 0] |
> | | |
> | | |
> | | |
> | 87 | [0, nan, nan, nan, 0, nan, 0, 0] |
> | | |
> | | |
> | | |
> | 85 | [0, nan, nan, nan, 0, nan, nan, nan, 0, nan, 0, 0] |
> | | |
> |-------+----------------------------------------------------|
> #+TBLFM: $2 = if(vlen(@-I$1..@0$1) == 1 || "$1" == "nan", string(""),
> 0 * rev(@-I$1..@0$1)); E
>
> Distance to previous element:
>
> |-------+------------|
> | value | difference |
> |-------+------------|
> | 12 | |
> | 15 | 1 |
> | | |
> | 83 | 2 |
> | | |
> | | |
> | | |
> | 87 | 4 |
> | | |
> | | |
> | | |
> | 85 | 4 |
> | | |
> |-------+------------|
> #+TBLFM: $2 = if(vlen(@-I$1..@0$1) == 1 || "$1" == "nan", string(""),
> find(0 * rev(@-I$1..@0$1), 0, 2) - 1); E
>
> Previous element:
>
> |-------+------------|
> | value | difference |
> |-------+------------|
> | 12 | |
> | 15 | 12 |
> | | |
> | 83 | 15 |
> | | |
> | | |
> | | |
> | 87 | 83 |
> | | |
> | | |
> | | |
> | 85 | 87 |
> | | |
> |-------+------------|
> #+TBLFM: $2 = if(vlen(@-I$1..@0$1) == 1 || "$1" == "nan", string(""),
> subscr(rev(@-I$1..@0$1), find(0 * rev(@-I$1..@0$1), 0, 2)); E
>
> Combined:
>
> |-------+------------|
> | value | difference |
> |-------+------------|
> | 12 | |
> | 15 | 3 |
> | | |
> | 83 | 34 |
> | | |
> | | |
> | | |
> | 87 | 1 |
> | | |
> | | |
> | | |
> | 85 | -0.5 |
> | | |
> |-------+------------|
> #+TBLFM: $2 = if(vlen(@-I$1..@0$1) == 1 || "$1" == "nan", string(""),
> ($1 - subscr(rev(@-I$1..@0$1), find(0 * rev(@-I$1..@0$1), 0, 2))) /
> (find(0 * rev(@-I$1..@0$1), 0, 2) - 1)); E
>
Looks very interesting. I have to evaluate this.
> For many here on the list it would probably be easier and more
> interesting to write a TBLFM in Lisp.
>
I will look into that later. Would it then also be possible to fill
several fields at the same time? At the moment I use the same checks for
several fields. That is not really DRY.
--
Cecil Westerhof
[-- Attachment #2: Type: text/html, Size: 8130 bytes --]
next prev parent reply other threads:[~2014-06-01 14:13 UTC|newest]
Thread overview: 6+ messages / expand[flat|nested] mbox.gz Atom feed top
2014-06-01 11:38 Difference between two rows Cecil Westerhof
2014-06-01 11:57 ` Michael Brand
2014-06-01 12:24 ` Cecil Westerhof
2014-06-01 13:18 ` Michael Brand
2014-06-01 14:12 ` Cecil Westerhof [this message]
2014-06-01 17:57 ` Thierry Banel
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=CAG-LmmCD+TO6sa6qxp2CziVJNVY-gxDGNBX8wP1jxsq9L4_FKw@mail.gmail.com \
--to=cldwesterhof@gmail.com \
--cc=emacs-orgmode@gnu.org \
/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).