Y箱

最近、更新していないのは、仕事でちょっとしたログ監視の仕組みを作ることになって、自分しかメンテできないことを覚悟の上で、Clojureを使って構築していたから。

キーワードだけ並べてみる。

サーバー
  clojure
  compojure
  hiccup (テスト用)
  commons.io.input.Tailer

データベース
  mongodb
  mongoika

クライアント
  dojo
  maqetta

調べながらだったので、1ヶ月ぐらいかかったけれど、初めての割に早くできた。
順調に動いているようだし、とてもいい。

広げていけるといいなぁ。むりかな。
逆に、本格的に運用で...とか言われたら困るな。

ClojureScriptに手を出したのですが、lein depsがエラーを吐いてしまったので、ここで一つ、leiningen 2(lein2)に移行してみようと思ったわけです。

1から2へのアップグレード方法が本家のここのページにあるので、これに沿ってやってみた作業のログです。

ちなみに、環境はWindows7で、ファイル操作はEmacsのeshellでやっています。

素数を2乗,3乗,4乗した数の和についての問題です。

とりあえずfor(内包表記)を使ってやってみるかな、と思ってたらできちゃいました。

直方体の向いあった頂点を結ぶ最短距離が整数になる場合の数を求める問題

全数アタックで解いた。
思ったよりも時間はかからずにできました。

長方形を正方格子で切ったときに内部にできる長方形の数が二百万にもっとも近いものを求める問題です。

これも自分で解いたぞ。

モノポリーの各マスに止まる確率を求める問題です。

純粋に計算で出るんじゃないかと思ったけど、だめっぽい。計算のしかたからしてわからない。どうしよう。どうしよう。


で、実際にやってみることにした。 シミュレーションです。
サイコロ振って、マス目を移動して、そこの指示に従う、ってのをたくさん繰り返して、それぞれのマスに止った数を数えて確率を計算します。
最終的に百万回で答を出してます。

ソースは長めですけど、パキパキとできあがって、たのしかったな。
ここのところ、見つけてきた公式にあてはめてっていうパターンが多かったのでさおさらかな。

そういえば、今回から1.4でやってます。mapvとかvecter系の関数はちょっと便利そう。まだ使ってないけど。

テンプレートいじっていたら、ページがおかしなことになってしまったので、移りました。
こっちがあたらしいです。