2008-03-01から1ヶ月間の記事一覧

「クワシッ!クォート!」スキーム(λ)

GaucheでProject Eulerを1〜30まで解いた。いまのところ、素数の和や、素因数分解や約数といった、素数列を扱う問題が多い。高速な素数ストリームがほしい。200万までの素数を30秒で計算できるようなの。総じてHaskellに有利な問題が多い。 こういう頭使う問…

必殺技っぽく 叫 ん で も 違和感のないジャーゴン

1 :以下、名無しにかわりましてλがお送りします。:2008/03/23(日) メェェルセンヌゥゥッ ツイスタァァァァ!!! 2 :以下、名無しにかわりましてλがお送りします。:2008/03/23(日) ポリモーフィックゥゥゥヴァリアントォォ!! 3 :以下、名無しにかわりましてλ…

コード

Gaucheで総当たりで解きます。わかりやすく書くとこんなコード。 (use srfi-1) (use util.combinations) (define (same-answer? x y) ;;ネックレスの等価判定。 (or (equal? x y) (equal? x (cons (car x) (reverse (cdr y)))))) (define (5balls-very-simpl…

『笑わない数学者』のビリヤードの問題をGaucheで

ヒビルテ(2008-03-12)から。 5つのビリヤードの玉を、真珠のネックレスのようにリングにつなげてみる。 さて、この5つの玉のうち、幾つ取っても良いが、 隣どうし連続したものしか取れないとしよう。 一つでも二つでも、5つ全部でも良い。しかし、離れている…

30分プログラム 回文積(Project Euler)

from みずぴー日記 Project Euler Problem 4 左右どちらから読んでも同じ値になる数を回文数という。 2桁の数の積で表される回文数のうち、最大のものは 9009 = 91 * 99 である。 では、3桁の数の積で表される回文数のうち最大のものはいくらになるか。 Hask…

script.aculo.usのAutoCompleterで受付係お助けプログラムを作ってみた

受付くん1号 zipパッケージ 結婚式場で、パーティーで、カンファレンスで・・・ 受付では、何が起きるかわかりません。名前が聞き取りにくい、あいつは遅れる、参加費はつけにしてくれ、などなど。 それに対応すべく、シンプルイズベストに機能をしぼりまし…

30分プログラム 最大素因数分解の探索(Project Euler)

fromみずぴー日記 13195 の素因数は 5、7、13、29 である。600851475143 の素因数のうち最大のものを求めよ。 ポラード・ロー素因数分解法が面白そうだったのでチョイス。Gaucheで。 (use srfi-1) (use srfi-42) (use math.mt-random) ;;underの大きさは問題…

gauche.night、楽しかったです。

gauche.gongに参加すればよかったなぁ。就活と、script.aculo.usを読み解くの原稿につきっきりの間に、gauche.gongの募集が早々に締め切られちゃってあきらめました。継続サーバの話がProgramming Gauche本の最後に載ったので、fastCGIで継続サーバなんかは…

今日は gauche.night

id:hayamizさんのλデートにも参加する予定。どんな話が聞けるか楽しみ。 自分が話の種にできそうなのは、 継続サーバ 不思議のダンジョン自動生成アルゴリズム Dr.SchemeのFrTime(Functional Reactive Programming)の紹介 Wiiコンをパソコンにつなぐ 継続でa…

Rails勉強中

を粛々と読んでいます。 自分がおぼろげに考えていたアイデアが、Railsでバシバシ実現されていて泣ける。 もっと早く読んでおけばよかった・・・俺のバカバカバカ!