重複する要素を取り除く
Posted feedbacks - StandardML
まぁ、効率は良くない.。
1 2 3 4 5 6 7 8 | val xs = [3, 1, 4, 1, 5, 9, 2, 6, 5]
fun uniq [] = []
| uniq (x::xs) =
if List.exists (fn y => y = x) xs then uniq (List.filter (fn z => z <> x) xs)
else x :: uniq xs
val _ = uniq xs
|


にしお
#3412()
Rating1/1=1.00
これはアレイのuniqの派生問題です。 リストとかアレイという言葉は言語によってまちまちの意味で使われているので、 「配列のようなもの」という漠然とした意味にとって構いません。
[ reply ]