From: Nicolas Goaziou <n.goaziou@neuf.fr>
To: Carsten Dominik <dominik@uva.nl>
Cc: emacs-orgmode@gnu.org
Subject: Re: Spreadsheet and weighted means
Date: Sat, 04 Oct 2008 10:49:46 +0200 [thread overview]
Message-ID: <87r66w9239.fsf@selenimh.orion.org> (raw)
In-Reply-To: <CDC9DB57-9952-4008-8363-69CF0467E8FB@uva.nl> (Carsten Dominik's message of "Wed, 01 Oct 2008 21:26:37 +0200")
Hello,
Carsten Dominik <dominik@uva.nl> writes:
> (defun my-wmean (values weights)
> (let ((vsum 0) (wsum 0))
> (while (and values weights)
> (setq v (pop values) w (pop weights))
> (unless (equal "" v)
> (setq vsum (+ vsum (* (string-to-number w) (string-to-number
> v)))
> wsum (+ wsum (string-to-number w)))))
> (if (= vsum 0) "" (format "%.1f" (/ vsum wsum)))))
But in this case, there's no difference between one who didn't work and
one who just wasn't there: 0 0 and "empty" "empty" will have the same
"empty" mean, won't they ?
>> Finally, I wondered if it would be useful to make it built-in as
>> weighted means are somewhat popular in education.
>
> Well, I could do that, of course. But which version of this function?
> What ouput etc?
> I guess this would then be the original version, which returns a
> number, and which returns 0 if the student has done absolutely
> nothing....
Though it seems more of a rhetorical question, I would be tempted to
answer that any of them would be useful.
On the other hand, I can live with "my-wmean" in my .emacs.
Regards,
--
Nicolas Goaziou
prev parent reply other threads:[~2008-10-04 8:53 UTC|newest]
Thread overview: 14+ messages / expand[flat|nested] mbox.gz Atom feed top
2008-09-20 7:00 Spreadsheet and weighted means Nicolas Goaziou
2008-09-29 8:43 ` Carsten Dominik
2008-09-29 8:44 ` Carsten Dominik
2008-10-01 16:46 ` Nicolas Goaziou
2008-10-01 19:26 ` Carsten Dominik
2008-10-01 19:45 ` Embedded elisp formulas, was: " Eric Schulte
2008-10-01 20:29 ` Paul R
2008-10-02 0:03 ` Eric Schulte
2008-10-02 11:44 ` Carsten Dominik
2008-10-08 23:12 ` ANN: org-eval-light.el was: " Eric Schulte
2008-11-06 1:19 ` Eric Schulte
2008-11-09 7:02 ` Carsten Dominik
2008-11-10 19:51 ` Daniel Clemente
2008-10-04 8:49 ` Nicolas Goaziou [this message]
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=87r66w9239.fsf@selenimh.orion.org \
--to=n.goaziou@neuf.fr \
--cc=dominik@uva.nl \
--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).