{"author_name":"uncorrelated","url":"https://uncorrelated.hatenablog.com/entry/20150209/1423445209","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Funcorrelated.hatenablog.com%2Fentry%2F20150209%2F1423445209\" title=\"\u7279\u5b9a\u6708\u306e\u5206\u6563\u304c\u5927\u304d\u3044\u3068\u304d\u306e\u5927\u6570\u306e\u6cd5\u5247 -  \u9921\u5b50\u4ed8\u309b\u9332\u309b\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","title":"\u7279\u5b9a\u6708\u306e\u5206\u6563\u304c\u5927\u304d\u3044\u3068\u304d\u306e\u5927\u6570\u306e\u6cd5\u5247","provider_url":"https://hatena.blog","author_url":"https://blog.hatena.ne.jp/uncorrelated/","image_url":null,"version":"1.0","height":"190","width":"100%","type":"rich","blog_url":"https://uncorrelated.hatenablog.com/","published":"2015-02-09 10:26:49","provider_name":"Hatena Blog","categories":["R\u8a00\u8a9e"],"blog_title":" \u9921\u5b50\u4ed8\u309b\u9332\u309b","description":"\u5225\u306e\u30d6\u30ed\u30b0\u3067\u4f7f\u3063\u305f\u5927\u6570\u306e\u6cd5\u5247\u3092\u793a\u3059\u30b7\u30df\u30e5\u30ec\u30fc\u30b7\u30e7\u30f3\u306e\u30bd\u30fc\u30b9\u30b3\u30fc\u30c9\u3067\u3059\u3002 # \u4e71\u6570\u304b\u3089\u5206\u6790\u30c7\u30fc\u30bf\u3092\u4f5c\u308b set.seed(20150209) x.sd <- 16.96534 # \u60f3\u5b9a\u6a19\u6e96\u504f\u5dee n <- 24 # \u5206\u6790\u5e74\u6570 x <- as.numeric(n*12) # \u5206\u6790\u30c7\u30fc\u30bf for(i in seq(1, (n-1)*12, 12)){ x[i:(i+11)] <- c(rnorm(3, sd=x.sd), rnorm(1, sd=x.sd*2), rnorm(8, sd=x.sd)) } # \u5206\u6790\u30c7\u30fc\u30bf\u306e\u72b6\u614b\u3092\u78ba\u8a8d plot(x, type=\"l\", main=\"\u96c6\u8a08\u524d\u30c7\u30fc\u30bf\", xl\u2026"}