From 59d14670044bcf91a40a6264d6b50787f22cc787 Mon Sep 17 00:00:00 2001 From: Jacopo De Simoi Date: Mon, 1 Dec 2025 19:04:36 -0500 Subject: [PATCH] [p1] More idiomatic --- p1/p1.org | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/p1/p1.org b/p1/p1.org index b884e07..66e74b9 100644 --- a/p1/p1.org +++ b/p1/p1.org @@ -35,7 +35,7 @@ For part 2, This works: (defun average (li) (/ (-sum li) (length li))) - (let ((number-lists (--map (-running-sum (append (list it) data)) + (let ((number-lists (--map (-running-sum (cons it data)) (list 50.5 49.5)))) (average (--map (-sum (--map (abs (- (car it) (cdr it)))