luciano/clojure-koans
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

21

Browse source
This commit is contained in:
Matthew Davidson 2023-01-04 14:43:12 +01:00
parent edaae03c53
commit 064f6405ad
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
src/koans/21_partition.clj
View file

@ -3,19 +3,19 @@
(meditations
"To split a collection you can use the partition function"
(= '((0 1) (2 3)) (__ 2 (range 4)))
(= '((0 1) (2 3)) (partition 2 (range 4)))
"But watch out if there are not enough elements to form n sequences"
(= '(__) (partition 3 [:a :b :c :d :e]))
(= '([:a :b :c]) (partition 3 [:a :b :c :d :e]))
"You can use partition-all to include any leftovers too"
(= __ (partition-all 3 (range 5)))
(= '((0 1 2) (3 4)) (partition-all 3 (range 5)))
"If you need to, you can start each sequence with an offset"
(= '((0 1 2) (5 6 7) (10 11 12)) (partition 3 __ (range 13)))
(= '((0 1 2) (5 6 7) (10 11 12)) (partition 3 5 (range 13)))
"Consider padding the last sequence with some default values..."
(= '((0 1 2) (3 4 5) (6 :hello)) (partition 3 3 [__] (range 7)))
(= '((0 1 2) (3 4 5) (6 :hello)) (partition 3 3 [:hello] (range 7)))
"... but notice that they will only pad up to the given sequence length"
(= '((0 1 2) (3 4 5) __) (partition 3 3 [:these :are "my" "words"] (range 7))))
(= '((0 1 2) (3 4 5) (6 :these :are)) (partition 3 3 [:these :are "my" "words"] (range 7))))