1

CodeEvalのSimpleSortingの解法に関する質問です。
https://www.codeeval.com/open_challenges/91/

以下のコードを実行すると、Float型のソートがうまく行きません。
(-10.000, -1.000, -2.000) -> (-1.000, -2.000, -10.000)

なぜなのか、ヒントを教えてください。

(ns simple-sorting.core
  (:use [clojure.string :only [split join]])
  (:gen-class))

(defn splt-num [s]
  (split s #" "))

(defn str->num [coll]
  (map read-string coll))

(defn num->float3 [coll]
  (vec (map #(format "%.3f" %1) coll)))

(with-open [rdr (clojure.java.io/reader (first *command-line-args*))]
  (doseq [line (remove empty? (line-seq rdr))]
    (def nums (splt-num line))
    (def nss (str->num nums))
    (def f3 (num->float3 nss))
    (println (join " " (sort f3)))))

1 件の回答 1

2

num->float3で数値を文字列にしてしまってからソートしていることが原因です。文字列としてのソートだと、うまくいく場合もありますが、["-10.000" "-1.000" "-2.000"] -> ["-1.000" "-10.000" "-2.000"]のようにうまくいかない場合もあります。
文字列への変換とソートの順序を逆にするといいでしょう。

(with-open [rdr (clojure.java.io/reader (first *command-line-args*))]
  (doseq [line (remove empty? (line-seq rdr))]
    (let [nums (-> line splt-num str->num sort)]
      (println (join " " nums)))))

なお、Clojureではdefで定義された変数は、関数定義やletの中であっても常に名前空間のトップレベルに定義されてしまうので、上のようにletを使うなどしてローカル変数にする方がよりよいスタイルとされています。

この質問に回答するには、ログインする必要があります。

求めていた回答ではありませんか? のタグが付いた他の質問を参照する。