等比数列を無限に生成する

説明

Egison言語で等比数列を無限に生成するには「(define $変数名 {初期値 @(map (* $ 値) 変数名)})」を使います。(define $n {1 @(map (* $ 2) n)})とすると変数nに1から始まり2倍ずつ乗算される数値(1,2,4,8,16,32,64,128,256...)が無限に入ります。

サンプル [サンプルをダウンロード]

(define $n {1 @(map (* $ 2) n)})
(take 20 n)

実行結果

Egison言語を使ったプログラムの実行結果