[過去ログ] 当直医のスレ Part24 [無断転載禁止]©2ch.net (1002レス)
上下前次1-新
このスレッドは過去ログ倉庫に格納されています。
次スレ検索 歴削→次スレ 栞削→次スレ 過去ログメニュー
864: innuendo ◆kCkk5BVA12 2017/10/11(水)21:23 ID:8dgUXTG5(29/32) AAS
>>863
画像リンク[png]:i.imgur.com
の係数を出してみた
> .anscombe=data.frame(x1,x2,x3,x4,y1,y2,y3,y4)
> ff <- y ~ x
> for(i in 1:4) {
+ ff[2:3] <- lapply(paste0(c("y","x"), i), as.name)
+ print(lm(ff, data = .anscombe)$coef)
+ }
(Intercept) x1
0.8898347 -4.3574432
(Intercept) x2
1.504104 -6.243640
(Intercept) x3
1.738786 -7.197800
(Intercept) x4
1.409430 -5.865328
最拡大の回帰直線でもまあ、傾向は維持されているな。
数字だけみてグラフ化を怠るとこういうのがあるからな。
有名なAnscombeのデータのグラフ化
画像リンク[png]:i.imgur.com
上下前次1-新書関写板覧索設栞歴
あと 138 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル
ぬこの手 ぬこTOP 0.007s