string - 为什么以下 Clojure 未检测到回文？

Question

我只是想转换为字符串并与相反的内容进行比较

(defn is-palindrome? [num]
  (= (str num) (reverse (str num))))

类似的东西

(is-palindrome 1221)

返回 false

Answer 1

试试这个:

(defn is-palindrome? [num]
  (= (str num) (apply str (reverse (str num)))))

在您的代码中，表达式 (reverse (str 1221)) 返回字符列表 (\1\2\2\1)，需要将其返回为字符串以便进行比较。或者，您可以将这两个数字转换为字符列表并执行列表比较:

(defn is-palindrome? [num]
  (= (seq (str num)) (reverse (str num))))