Clojure: Еще немного о хешах
В Clojure с помощью хеш-мап коду легко задать полиморфное поведение. Хотя это и не единственный способ, но такой подход работает:
; Создадим простой калькулятор с помощью хеш-мапы
(defn calc [first-num second-num operation]
(let [operations-map {"+" +
"-" -
"*" *
"^" (fn [a b] (int (Math/pow a b)))}]
((operations-map operation) first-num second-num)))
(calc 2 3 "+") ; => 5
(calc 2 3 "-") ; => -1
(calc 2 3 "*") ; => 6
(calc 2 3 "^") ; => 8В языке реализованы функции по работе с вложенными словарями, например, обращение к вложенным элементам словаря.
; создадим вложенный хеш
(def company
{:name "WidgetCo"
:address {:street "123 Main St"
:city "Springfield"
:state "IL"}})
; обратимся к вложенному хешу
(get-in company [:address :state])
"IL"
; теперь обновим вложенный хеш
(assoc-in company [:address :street] "303 Broadway")
; => {:name "WidgetCo",
; => :address {:state "IL",
; => :city "Springfield",
; => :street "303 Broadway"}}
(def scores {"Andrew" 100 "Angela" 200})
(merge scores {"Kim" 150 "Ivan" 200})
; => {"Andrew" 100, "Angela" 200, "Kim" 150, "Ivan" 200}Задание
Создайте функцию freq, которая принимает коллекцию элементов и создает хеш-мапу с частотой появления элементов в коллекции. Больше подробностей в примерах.
(freq ["a" "b" "c" "a" "a" "c" "a" "d" "b"])
; => {"a" 4, "b" 2, "c" 2, "d" 1}
(freq [])
; => {}
(freq ["Clojure" "Ruby" "Clojure" "Elixir" "Ruby" "HTML" "JS"])
; => {"Clojure" 2, "Ruby" 2, "Elixir" 1, "HTML" 1, "JS" 1}
(freq [10 10 10 20 300 41 53])
; => {10 3, 20 1, 300 1, 41 1, 53 1}
(freq [:a :b :c :d :a :a])
; => {:a 3, :b 1, :c 1, :d 1}Clojure: Еще немного о хешах
В Clojure с помощью хеш-мап коду легко задать полиморфное поведение. Хотя это и не единственный способ, но такой подход работает:
; Создадим простой калькулятор с помощью хеш-мапы
(defn calc [first-num second-num operation]
(let [operations-map {"+" +
"-" -
"*" *
"^" (fn [a b] (int (Math/pow a b)))}]
((operations-map operation) first-num second-num)))
(calc 2 3 "+") ; => 5
(calc 2 3 "-") ; => -1
(calc 2 3 "*") ; => 6
(calc 2 3 "^") ; => 8В языке реализованы функции по работе с вложенными словарями, например, обращение к вложенным элементам словаря.
; создадим вложенный хеш
(def company
{:name "WidgetCo"
:address {:street "123 Main St"
:city "Springfield"
:state "IL"}})
; обратимся к вложенному хешу
(get-in company [:address :state])
"IL"
; теперь обновим вложенный хеш
(assoc-in company [:address :street] "303 Broadway")
; => {:name "WidgetCo",
; => :address {:state "IL",
; => :city "Springfield",
; => :street "303 Broadway"}}
(def scores {"Andrew" 100 "Angela" 200})
(merge scores {"Kim" 150 "Ivan" 200})
; => {"Andrew" 100, "Angela" 200, "Kim" 150, "Ivan" 200}Задание
Создайте функцию freq, которая принимает коллекцию элементов и создает хеш-мапу с частотой появления элементов в коллекции. Больше подробностей в примерах.
(freq ["a" "b" "c" "a" "a" "c" "a" "d" "b"])
; => {"a" 4, "b" 2, "c" 2, "d" 1}
(freq [])
; => {}
(freq ["Clojure" "Ruby" "Clojure" "Elixir" "Ruby" "HTML" "JS"])
; => {"Clojure" 2, "Ruby" 2, "Elixir" 1, "HTML" 1, "JS" 1}
(freq [10 10 10 20 300 41 53])
; => {10 3, 20 1, 300 1, 41 1, 53 1}
(freq [:a :b :c :d :a :a])
; => {:a 3, :b 1, :c 1, :d 1}Ваше упражнение проверяется по этим тестам
(ns intro-hashes-test
(:require [test-helper :refer [assert-solution]]
[index :refer [freq]]))
(assert-solution
[[["a" "b" "c" "a" "a" "c" "a" "d" "b"]]
[[]]
[["Clojure" "Ruby" "Clojure" "Elixir" "Ruby" "HTML" "JS"]]
[[10 10 10 20 300 41 53]]
[[:a :b :c :d :a :a]]]
[{"a" 4 "b" 2 "c" 2 "d" 1}
{}
{"Clojure" 2 "Ruby" 2 "Elixir" 1 "HTML" 1 "JS" 1}
{10 3 20 1 300 1 41 1 53 1}
{:a 3 :b 1 :c 1 :d 1}]
freq)Решение учителя откроется через:
20:00
