Perl の reduce (List::Util) で配列を作る方法
SICP の2.2.3節あたりを読んでいたら、思いついたのでメモ。
いままで reduce で配列を作る方法がいまいち分かってなかったんだけど、以下のようにすればいい。 例えば、1から3までの数字について、元の数字とその数字を2乗した数の対の配列を作る場合はこう。
実行結果
初期値に空の配列リファレンスを入れておいてやるのが(個人的な)ポイント。 Perl の(というより List::Util の)reduce は初期値を設定できなくて使いづらいと思ってたんだけど、ただ単に、配列の先頭に初期値を突っ込んでやればいいだけだった。コロンブスの卵。 参考サイト: 畳み込み関数の比較 (fold / accumulate / inject / reduce) - blanket sky
by fkmn
| 2008-01-24 23:55
| IT
|
カテゴリ
以前の記事
2011年 06月
2011年 04月 2011年 02月 2011年 01月 2010年 12月 2010年 11月 2010年 05月 2010年 04月 2010年 03月 2009年 12月 more... ブログパーツ
リンク
検索
タグ
日記
IT
感想
本
programming
コンピュータ
ゲーム
Perl
CL
ライフサイエンス
一人読書会
インフォマティクス
Ruby
ブログ
ネタ
C#
PHP
yapcasia2008
生物
R
最新のトラックバック
その他のジャンル
ファン
記事ランキング
ブログジャンル
画像一覧
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
ファン申請 |
||