åˆã‚ã¦ã®äººã®ãŸã‚ã®LISP[増補改訂版]ã®ãƒ¡ãƒ¢ã§ã™ã€‚ 最åˆ:åˆã‚ã¦ã®äººã®ãŸã‚ã®LISP (第1講-第5講) - ã‚‚ã†ã‚«ãƒ„丼ã§ã„ã„よ㪠関数引数ã®åŸºæœ¬ã¯apply applyã®ç¬¬1引数ã¯é–¢æ•°ã§ã€ç¬¬2引数ãŒãã®é–¢æ•°ã®å¼•æ•°ã®ãƒªã‚¹ãƒˆ(第11講)。 数値ã ã‘ãŒå…¥ã£ãŸãƒªã‚¹ãƒˆã®ç·å’Œã‚’計算ã™ã‚‹ã€‚ (setq x '(1 2 3 4 5 6)) (apply '+ x) ; => 21 funcall funcallを使ã†ã¨å¼•æ•°ã‚’リストã«ã—ãªãã¦ã‚‚よã„。 (funcall '+ 1 2 3 4 5 6) ; => 21 mapcar mapcar関数ã¯ãƒªã‚¹ãƒˆã®å„々ã®è¦ç´ ã«é–¢æ•°ã‚’applyã—ãŸçµæžœã‚’リストã¨ã—ã¦è¿”ã™ã€‚ (setq x '(1 2 3 4 5)) (mapcar (lambda (x) (* x x)) x) ; => (1 4 9 16 25) 定義 (defun mapcar (fn mli
{{#tags}}- {{label}}
{{/tags}}