Size: a a a

Clojure — русскоговорящее сообщество

2020 January 17

СС

Сергей Суржик in Clojure — русскоговорящее сообщество
я кстати вчера так бросая и выиграл) первее набрал нужные очки)
источник

СС

Сергей Суржик in Clojure — русскоговорящее сообщество
а и вниз бросать сподручнее, чем вверх)
источник

T

The2lb3oz4dr10½grOfHedgehogs in Clojure — русскоговорящее сообщество
Сергей Суржик
(def darts-numbers '(20 1 18 4 13 6 10 15 2 17 3 19 7 16 8 11 14 9 12 5 20 1))

(->>
darts-numbers
(partition 3 1)
(map #(assoc {} (apply str (interpose "-" %)) (apply + %)))
(into {})
(apply max-key val))
Вместо ассок {} я бы вызвал hash map

(require '[clojure.string :as str])
(map (fn [x]
      {(str/join "-"  x)
       (apply + x)}))
источник

СС

Сергей Суржик in Clojure — русскоговорящее сообщество
сейчас попробую
источник

СС

Сергей Суржик in Clojure — русскоговорящее сообщество
можно и так) да)
источник

T

The2lb3oz4dr10½grOfHedgehogs in Clojure — русскоговорящее сообщество
Сергей Суржик
(def darts-numbers '(20 1 18 4 13 6 10 15 2 17 3 19 7 16 8 11 14 9 12 5 20 1))

(->>
darts-numbers
(partition 3 1)
(map #(assoc {} (apply str (interpose "-" %)) (apply + %)))
(into {})
(apply max-key val))
Тут кстати into {} не нужен
источник

T

The2lb3oz4dr10½grOfHedgehogs in Clojure — русскоговорящее сообщество
Можно пропустить этот шаг, если не ошибаюсь
источник

СС

Сергей Суржик in Clojure — русскоговорящее сообщество
java.lang.ClassCastException: clojure.lang.PersistentArrayMap cannot be cast to java.util.Map$Entry

если пропустить
источник

СС

Сергей Суржик in Clojure — русскоговорящее сообщество
просто перед инто вот такая структура будет
источник

T

The2lb3oz4dr10½grOfHedgehogs in Clojure — русскоговорящее сообщество
Сергей Суржик
java.lang.ClassCastException: clojure.lang.PersistentArrayMap cannot be cast to java.util.Map$Entry

если пропустить
val на second поменяй
источник

T

The2lb3oz4dr10½grOfHedgehogs in Clojure — русскоговорящее сообщество
В макс-кей
источник

T

The2lb3oz4dr10½grOfHedgehogs in Clojure — русскоговорящее сообщество
(->>
darts-numbers
(partition 3 1)
(map (fn [x]
      [(str/join "-"  x)
       (apply + x)]))
(apply max-key second))
источник

СС

Сергей Суржик in Clojure — русскоговорящее сообщество
({"20-1-18" 39} {"1-18-4" 23})
источник

T

The2lb3oz4dr10½grOfHedgehogs in Clojure — русскоговорящее сообщество
И хешмапу на вектор заменить в мапе
источник

T

The2lb3oz4dr10½grOfHedgehogs in Clojure — русскоговорящее сообщество
The2lb3oz4dr10½grOfHedgehogs
(->>
darts-numbers
(partition 3 1)
(map (fn [x]
      [(str/join "-"  x)
       (apply + x)]))
(apply max-key second))
Вот
источник

СС

Сергей Суржик in Clojure — русскоговорящее сообщество
(->>
darts-numbers
(partition 3 1)
(map #([(clojure.string/join "-" %) (apply + %)]))
(apply max-key second))

где я не прав?
Wrong number of args (0) passed to: clojure.lang.PersistentVector
источник

T

The2lb3oz4dr10½grOfHedgehogs in Clojure — русскоговорящее сообщество
Сергей Суржик
(->>
darts-numbers
(partition 3 1)
(map #([(clojure.string/join "-" %) (apply + %)]))
(apply max-key second))

где я не прав?
Wrong number of args (0) passed to: clojure.lang.PersistentVector
Нельзя через # делать не вызов функции
источник

T

The2lb3oz4dr10½grOfHedgehogs in Clojure — русскоговорящее сообщество
Он пытается вызвать вектор в результате
источник

T

The2lb3oz4dr10½grOfHedgehogs in Clojure — русскоговорящее сообщество
The2lb3oz4dr10½grOfHedgehogs
(->>
darts-numbers
(partition 3 1)
(map (fn [x]
      [(str/join "-"  x)
       (apply + x)]))
(apply max-key second))
У меня fn на скрине
источник

СС

Сергей Суржик in Clojure — русскоговорящее сообщество
аааааа точно
источник