{"blog_title":"arupaka-_-arupaka\u306e\u65e5\u8a18","author_name":"arupaka-_-arupaka","title":"ggplot2\u3067\u6642\u7cfb\u5217\u7684\u306a\u30c7\u30fc\u30bf\u3092\uff12\u3064\u4e26\u3079\u305f\u56f3\u3092\u4f5c\u308b\u4f8b\u3002\u56f3\u3092\u4e26\u3079\u308b","published":"2018-05-17 11:24:24","author_url":"https://blog.hatena.ne.jp/arupaka-_-arupaka/","height":"190","categories":["R","ggplot2"],"version":"1.0","provider_name":"Hatena Blog","url":"https://arupaka-arupaka.hatenadiary.org/entry/20180517/1526523864","provider_url":"https://hatena.blog","description":"ggplot2\u3067\u6642\u7cfb\u5217\u7684\u306a\u30c7\u30fc\u30bf\u3092\uff12\u3064\u4e26\u3079\u305f\u56f3\u3092\u4f5c\u308b\u4f8b\u3002\u56f3\u3092\u4e26\u3079\u308b x1a<-cumsum(rnorm(1000,mean=0,sd=1)) x1b<-cumsum(rnorm(1000,mean=0,sd=1)) m1<-seq(0,2,length.out=length(x1a)) y1<-x1a*m1 y2<-x1b z1<-x1a z2<-x1b/m1 x1<-1:length(y1) set1<-factor(c(rep(\"g(t)\",length(x1)),rep(\"f(t)\",length(x1))),levels=c(\"g(t)\",\"f(t)\")) x0<-c(x1,x1) y\u2026","type":"rich","width":"100%","blog_url":"https://arupaka-arupaka.hatenadiary.org/","image_url":null,"html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Farupaka-arupaka.hatenadiary.org%2Fentry%2F20180517%2F1526523864\" title=\"ggplot2\u3067\u6642\u7cfb\u5217\u7684\u306a\u30c7\u30fc\u30bf\u3092\uff12\u3064\u4e26\u3079\u305f\u56f3\u3092\u4f5c\u308b\u4f8b\u3002\u56f3\u3092\u4e26\u3079\u308b - arupaka-_-arupaka\u306e\u65e5\u8a18\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>"}