help-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Passing function to mapcar


From: Stephen Berman
Subject: Re: Passing function to mapcar
Date: Mon, 02 Sep 2024 11:04:08 +0200
User-agent: Gnus/5.13 (Gnus v5.13)

On Sun, 01 Sep 2024 23:44:03 +0000 Heime <heimeborgia@protonmail.com> wrote:

> I am using mapcar to apply the lambda function taking values
> in rgb-list as argument c.
>
> (mapcar (lambda (c)
>           (min 255 (max 0 (round (* c factor)))))
>         rgb-list)
>
> I think that the function used for mapcar should have only a
> single argument.  Is this correct ?

Yes.

> What can one do if I want to call a function with more than
> a single argument ?
>
> (defun myfunc (c factor)
>   (min 255 (max 0 (round (* c factor)))))
>
> (mapcar myfunc(c factor) rgb-list)

If you redefine `myfunc' to make `factor' the first argument and `c' the
second, you can use apply-partially; maybe that does what you want:

(let ((rgb-list '(37 157 217))
      (factor 0.7))
  (mapcar (apply-partially #'myfunc factor) rgb-list))
=>
(26 110 152)

(If `factor' is always a single number you don't need to redefine
`myfunc', since multiplication is commutative, but then the argument `c'
is assigned the value of `factor' in the call to apply-partially and the
argument `factor' gets the respective values of `rgb-list', so
conceptually it's better to switch the arguments.)

Steve Berman



reply via email to

[Prev in Thread] Current Thread [Next in Thread]