Clojure длина последовательности

Я мог бы поклясться, что раньше работал alength, но я не совсем понимаю, что я делаю неправильно сейчас:

user=> (alength '(1 2 3))
IllegalArgumentException No matching method found: alength  clojure.lang.Reflector.invokeMatchingMethod (Reflector.java:79)
user=> (alength [1 2 3])
IllegalArgumentException No matching method found: alength  clojure.lang.Reflector.invokeMatchingMethod (Reflector.java:79)
user=> (doc alength)
-------------------------
clojure.core/alength
([array])
  Returns the length of the Java array. Works on arrays of all
  types.
nil

Что мне делать, чтобы получить длину списка/массива в Clojure?

Ответы

Ответ 1

Как говорит docstring, alength работает с массивами Java ™, такими как String[] или Integer[], который определенно является несовместимым типом с списками или векторами Clojure, для которых вы хотите использовать count:

user=> (def x '(1 2 3))
#'user/x
user=> (def xa (to-array x))
#'user/xa
user=> (class x)
clojure.lang.PersistentList
user=> (class xa)
[Ljava.lang.Object;
user=> (alength xa)
3
user=> (alength x) 
java.lang.IllegalArgumentException: No matching method found: alength (NO_SOURCE_FILE:0)
user=> (count x)
3

[Ljava.lang.Object; - это странный способ toString define для вывода для собственных массивов Object.

Ответ 2

Попробуйте использовать count:

(count '(1 2 3))
=> 3
(count [1 2 3])
=> 3

Ответ 3

Он должен быть count.

user=> (count '(1 2 3))
3

Ответ 4

Это может быть излишним, но вы можете подражать общей функции длины LISP следующим образом:

(def length 
 (fn [lst]
  (loop [i lst cnt 0]
   (cond (empty? i) cnt
     :t (recur (rest i)(inc cnt))))))

Ответ 5

Вы можете сделать это, используя рекурсивный способ:

(defn length
 [list]
 (if (empty? list) 0
  (+ 1 (length (rest list)))))

Надеюсь, это поможет!