関数型プログラミング言語Haskell Part32

[533 デフォルトの名無しさん 2019/10/12(土) 11:27:51.29 ID:/Y14moqf]

>>510 です

mylist n = take n $ f [[1..n]]
where
f [ns] = ns : f [g ns]
g ns = map (+3) ns

としたところで、要素に f を繰り返し適用して無限リストを作る関数があることを思い出し、思い出せずにカンニングして iterate を発見

mylist n = take n $ iterate f [1..n]
where
f ns = map (+n) ns

map (+n) 辺りがどうも…