{"blog_url":"https://ryamada22.hatenablog.jp/","title":"p.adjust()\u95a2\u6570\u3092\u4f7f\u3046","image_url":"https://cdn-ak.f.st-hatena.com/images/fotolife/r/ryamada22/20120902/20120902052226.jpg","url":"https://ryamada22.hatenablog.jp/entry/20120903/1346531104","width":"100%","author_name":"ryamada22","type":"rich","categories":["\u30de\u30a4\u30af\u30ed\u30a2\u30ec\u30a4","R","FDR"],"html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fryamada22.hatenablog.jp%2Fentry%2F20120903%2F1346531104\" title=\"p.adjust()\u95a2\u6570\u3092\u4f7f\u3046 - ryamada\u306e\u907a\u4f1d\u5b66\u30fb\u907a\u4f1d\u7d71\u8a08\u5b66\u30e1\u30e2\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","version":"1.0","height":"190","published":"2012-09-03 05:25:04","provider_url":"https://hatena.blog","blog_title":"ryamada\u306e\u907a\u4f1d\u5b66\u30fb\u907a\u4f1d\u7d71\u8a08\u5b66\u30e1\u30e2","author_url":"https://blog.hatena.ne.jp/ryamada22/","provider_name":"Hatena Blog","description":"\u6628\u65e5\u306e\u7d9a\u304d \u30de\u30a4\u30af\u30ed\u30a2\u30ec\u30a4\u30c7\u30fc\u30bf\u3092\u30af\u30e9\u30b9\u30bf\u30ea\u30f3\u30b0\u3057\u305f \u30d5\u30a7\u30ce\u30bf\u30a4\u30d7\u3068\u691c\u5b9a\u3057\u3066\u3001FDR\u88dc\u6b63\u3057\u3066\u307f\u308b # \u30b5\u30f3\u30d7\u30eb\u6570 Ns <- 500 # \u30de\u30fc\u30ab\u30fc\u6570 Nm <- 1000 # \u30b5\u30f3\u30d7\u30eb\u306e\u30d1\u30bf\u30fc\u30f3\u6570(\u7fa4\u6570) Ns.pt <- 10 # \u30de\u30fc\u30ab\u30fc\u306e\u30d1\u30bf\u30fc\u30f3\u6570(\u7fa4\u6570) Nm.pt <- 10 # \u30b5\u30f3\u30d7\u30eb\u30fb\u30de\u30fc\u30ab\u30fc\u306e\u5b58\u5728\u4f4d\u7f6e\u3092\u591a\u6b21\u5143\u7a7a\u9593\u9154\u6b69\u306e\u9053\u3068\u3057\u3066\u4f5c\u308b trail <- matrix(rnorm(Ns.pt*Nm.pt),Ns.pt,Nm.pt) trail <- apply(trail,2,cumsum) # \uff13\u6b21\u5143\u5206\u3060\u3051\u898b\u3066\u307f\u3088\u3046 library(rgl) plot3d(trail[,1:3]\u2026"}