https://twitter.com/stathissideris/status/937273349872463872
γμτ το σημερινο advent το εκανα με loop-recur
oxiiii
χαχα
blame SICP 😛
το ειδες σταθη;
to koitazw twra
first part:
(->> ss
(map #(- (apply max %)
(apply min %)))
(apply +))
αυτο ειναι το χθεσινο!
το σημερινο ηταν πιο weird
a day 2 den ekana
katse na thn perasw gia na dw thn 3
wx arxisan ta dyskola 😄
χαχα
ναι δεν εχει σχεση με τα προηγουμενα
εγω ειδικα το πηγα παραξενα το α' μερος
και καηκα λιγο
den mou rxetai kati ayth th stigmh
tha to skeftw
θελει χρονο και ορεξη, no worries
το συζηταμε κι απο κοντα
second part tou xtesinou:
(->> ss
(map #(->> (for [x %
y %
:when (not= x y)]
[(/ x y)
(/ y x)])
(apply concat)
(filter int?)))
(map first)
(apply +))
ωραιο
εχω σκουριασει τοσο
που ξεχασα την υπαρξη της for
λολ
και το εκανα με combinatorics
e ntaksei logiko an exeis kairo na thn piaseis!