Любой список рано или поздно захочется обойти (traverse), то есть поработать с отдельными элементами. В процедурных языках используются циклы, но многие языки имеют и декларативные средства работы с коллекциями — map
, filter
, reduce
. А ведь сами эти функции пришли в программирование через LISP!
Clojure тоже предоставляет полный набор таких функций. Ближайшие несколько уроков будут посвящены этим встроенным в Clojure функциям.
map
Итак, map
в Clojure используется так:
(map inc (list 1 2 3)) ; '(2 3 4)
Здесь inc
— встроенная функция, добавляющая к числу единицу. Всё максимально предсказуемо: map
превращает старый список в новый, применяя функцию к каждому элементу. Обход получается функциональный, потому что мы получаем новый список, не меняя старый.
Может map
обходить и несколько списков одновременно: можно применить map
к нескольким спискам, тогда функция-аргумент будет применена ко всем первым элементам, затем ко всем вторым, и так далее. Но map
потребует от входных списков иметь одинаковую длину, иначе вы получите ошибку.
Вот так можно поэлементно просуммировать три списка:
(map +
(list 1 2 3)
(list 10 20 30)
(list 100 200 300))
; '(111 222 333)
Заметьте, не потребовалось даже использовать анонимную функцию, которая складывала бы три числа, ведь функция "+
" принимает произвольное количество аргументов!
Реализуйте функцию maps
, которая должна принимать два списка — список функций и список списков аргументов — и возвращать список результатов применения функций к наборам аргументов. Вот как использование maps
должно выглядеть:
(maps
(list
inc
string?)
(list
(list 10 20)
(list "a" 0)))
; '((11 21) (true false))
Здесь
'(11 21)
, это результат применения inc
к (list 10 20)
'(true false)
, это результат применения string?
к (list "a" 0)
Если вы зашли в тупик, то самое время задать вопрос в «Обсуждениях». Как правильно задать вопрос:
Тесты устроены таким образом, что они проверяют решение разными способами и на разных данных. Часто решение работает с одними входными данными, но не работает с другими. Чтобы разобраться с этим моментом, изучите вкладку «Тесты» и внимательно посмотрите на вывод ошибок, в котором есть подсказки.
Это нормально 🙆, в программировании одну задачу можно выполнить множеством способов. Если ваш код прошел проверку, то он соответствует условиям задачи.
В редких случаях бывает, что решение подогнано под тесты, но это видно сразу.
Создавать обучающие материалы, понятные для всех без исключения, довольно сложно. Мы очень стараемся, но всегда есть что улучшать. Если вы встретили материал, который вам непонятен, опишите проблему в «Обсуждениях». Идеально, если вы сформулируете непонятные моменты в виде вопросов. Обычно нам нужно несколько дней для внесения правок.
Кстати, вы тоже можете участвовать в улучшении курсов: внизу есть ссылка на исходный код уроков, который можно править прямо из браузера.
Ваше упражнение проверяется по этим тестам
1(ns loops-test
2 (:require [test-helper :refer [assert-solution]]
3 [index :refer [maps]]))
4
5(assert-solution
6 [[(list) (list)]
7 [(list inc) (list (list 0))]
8 [(list inc string?) (list (list 0 100) (list "foo" 42))]]
9 [(list)
10 (list (list 1))
11 (list (list 1 101) (list true false))]
12 maps)
13
Решение учителя откроется через: