diff options
Diffstat (limited to 'day6/part2.clj')
-rw-r--r-- | day6/part2.clj | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/day6/part2.clj b/day6/part2.clj deleted file mode 100644 index ad6fe91..0000000 --- a/day6/part2.clj +++ /dev/null @@ -1,25 +0,0 @@ -(require '[clojure.string :as str]) - -(->> (read-line) - (#(str/split % #",")) - (map read-string) - (reduce #(update %1 %2 inc) (vec (repeat 9 0))) - (iterate - #(let [nf (conj (vec (rest %)) (first %))] - (update nf 6 (partial + (get nf 8))) - ) - ) - (#(nth % 256)) - (apply +) - (println) - ) - -; ->> read input from stdin -; split input string by commas -; convert string array into number array -; reduce to frequency counts -; create iterator that returns next day's counts -; get 256th iteration -; sum all frequency counts -; print results - |