BOD

■[R][PRML]PRMLの図を描く 14:38

今後追加していく。

とりいそぎ。

library(ggplot2)
qplot(x = 0:1, geom = "blank") + 
stat_function(fun = function(x)1-(1-x)^1) + 
stat_function(fun = function(x)1-(1-x)^2) + 
stat_function(fun = function(x)1-(1-x)^5) + 
stat_function(fun = function(x)1-(1-x)^20)