K-01 に KMZ INDUSTAR 50-2 50mm/F3.5 (M42) を付けて撮ったみた

先日購入したK-01が楽しくてたまらない。何が楽しいって、マニュアルレンズで撮りやすいのが最高に楽しい。で、ついにM42マウントのレンズにも手を出してしまった。しかもロシア（ソ連）レンズ。 K-01にぴったりなパンケーキレンズ INDUSTAR 50-2。もっ…

2012-06-17

ggplot2の練習中

R

ggplot2は記法が独特なので敬遠してきたのですが、最近ggplot2を使うと良さそうな事案に遭遇したので勉強中です。 library(ggplot2) p1 <- ggplot(iris, aes(Petal.Length, fill=Species)) p1 + geom_histogram() + opts(title="積み重ねヒストグラム") p1 +…

2012-05-23

■

R

ネットワーク分析の再勉強。 # snaパッケージ library(sna) el.sna <- matrix(c( 1, 2, 1, 2, 1, 1, 1, 3, 1, 3, 1, 1, 1, 4, 1, 4, 1, 1, 5, 2, 1, 5, 6, 1, 6, 5, 1, 6, 2, 1, 7, 2, 1, 8, 2, 1, 9, 2, 1, 10, 2, 1, 11, 2, 1, 12, 2, 1, 13, 2, 1, 14, 3,…

2012-05-20

Rのバージョンアップ時のパッケージのアップデート方法

Rのバージョンアップの際、これまで使っていたパッケージも同時にアップデートしたいんだけど、毎回その効率的なやり方を忘れてしまうのでここにメモしておく。ネタ元は神戸大の中澤先生のメモ（ http://minato.sip21c.org/swtips/R.html ）。最新版のRを…

2012-03-18

Rで「ガチャとは心の所作」 #TokyoSciPy #rstatsj

R

Tokyo.SciPy#3で id:AntiBayesian さんがLTされていた「ガチャとは心の所作」が非常に興味深かったのでRでもやってみました。（もっとも、ustがなかったので私は発表資料を読んだだけですが…）「ガチャとは心の所作」 d:id:AntiBayesian:20120318 Rで書い…

2012-03-10

RでPSM分析 #TokyoR

まずは直接測定法 # テスト用データ cheap <- c(rep(2, 5), rep(4, 20), rep(6, 25), rep(8, 30), rep(10, 15), rep(12, 5)) expensive <- c(rep(12, 5), rep(14, 5), rep(16, 15), rep(18, 25), rep(20, 30), rep(22, 15), rep(24, 5)) # 度数の算出、テー…