Yapc::Asia2012::素数戦争 #yapcasia #素数戦争
** **** *** *** *** **** **** **** ********* ************* ********* **** **** **** ********** ***************** ******* *** ******* **** ****** ************** *************************** ****************** ********** ************* ***** ***** ********* ******* ******* ******* **** *************** *************** ************** ***** ***** ** ***** ** ************** ************** ******** ***** *
perl - 100までの素数 : 404 Blog Not Found
2006年06月16日22:00 カテゴリLLの夏Lightweight Languages perl - 100までの素数 なに前哨戦とな? キミならどう書く 2.0 - ROUND 1 - ? Lightweight Language Ring お題は「100までの整数から素数を列挙せよ」です．まずはCPANから。Perlから、と言わないところがミソ。 perl -MMath::Prime::XS=primes -le '$,=" "; print primes(100)' primesをsieve_primesとするとさらに高速。$,の使い方にも注目。 次にabigailの傑作の変種。 perl -le '$,=" "; print grep { (1 x $_) !~ /^(11+)\1+$/ } (2..100)' なんでこれで素数判定できるかは、読者の宿題。 最後に、割とけれん
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
