diff options
| author | Clyne Sullivan <clyne@bitgloo.com> | 2022-12-06 07:30:40 -0500 |
|---|---|---|
| committer | Clyne Sullivan <clyne@bitgloo.com> | 2022-12-06 07:30:40 -0500 |
| commit | 9be1e181be4cd58c0d6dd0f1c53d8d009cf0d147 (patch) | |
| tree | 2479bffd0affeb9202e6fffa7b06e5f89caf842b /day6/both.clj | |
| parent | f89c980176456002ff2dcc20ad4b5c86e5af2518 (diff) | |
add day 6
Diffstat (limited to 'day6/both.clj')
| -rw-r--r-- | day6/both.clj | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/day6/both.clj b/day6/both.clj new file mode 100644 index 0000000..817c17d --- /dev/null +++ b/day6/both.clj @@ -0,0 +1,10 @@ +(defn find-marker [data n] + (->> data + (partition n 1) + (map #(apply distinct? %)) + (take-while false?) + (#(+ n (count %))))) + +(let [data (slurp "input")] + (doseq [ind [4 14]] + (println (find-marker data ind)))) |