yarb https://blog.hatena.ne.jp/yarb/ yarbの日記 https://yarb.hatenadiary.org/ euler clojure プロジェクトオイラー35問目。123、231、312みたいにグルグル回した数字がすべて素数であるものを100万以下のものについて求めよ。 (defn prime? [n] (cond (> 2 n) false (== 2 n) true (even? n) false (not-any? zero? (map #(rem n %) (range 3 (inc (Math/sqrt n))))) true :else false)) (defn rot-numbers [n] "Returns the rotations of n. ex) 123 -> 123,231,312" (let [… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fyarb.hatenadiary.org%2Fentry%2F20100812%2Fp1" title="プロジェクトオイラー35問目 - yarbの日記" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2010-08-12 00:00:00 rich https://yarb.hatenadiary.org/entry/20100812/p1 1.0 100%