RosettaCodeData/Task/Averages-Arithmetic-mean/Emacs-Lisp/averages-arithmetic-mean-2.l
2015-11-18 06:14:39 +00:00

2 lines
74 B
Common Lisp

(setq x '[1 2 3 4])
(string-to-number (calc-eval (format "vmean(%s)" x)))