Rで標準入力を受け取る

Ideoneでデータを渡すときのためにメモめも

read.table("stdin")を呼ぶと中でfile("stdin")が呼ばれて,
stdinからデータが読み込まれる.
http://stat.ethz.ch/R-manual/R-devel/library/utils/html/read.table.html

# 標準入力からデータ読みこみ
x <- read.table("stdin")$V1;
l <- cut(x,seq(0,1,0.1));
v <- as.vector(mapply(function(i) sum(l==i),levels(l)));
# 度数分布( 区間(0,0.1],(0.1,0.2],...,(0.9,1.0] )
sapply(levels(l),function(i) sum(l==i));
# 一様性の検定(fisherだと時間がかかり過ぎるので)
chisq.test(v);

http://ideone.com/iwnoi

ついでに, 気になった論文メモ. あとで探す
長畑 秀和. 一様性の検定の為にX^^2テストを用いるときの分割数について
http://ci.nii.ac.jp/naid/110000129672