統計解析R たぶんpart3くらい (587レス)
統計解析R たぶんpart3くらい http://mevius.5ch.net/test/read.cgi/tech/1340339592/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
レス栞
リロード規制
です。10分ほどで解除するので、
他のブラウザ
へ避難してください。
93: デフォルトの名無しさん [sage] 2014/08/14(木) 23:20:58.24 ID:R0JPen8d ちょっとお聞きしたいのですが、 x y z f 1 1 1 f1 1 1 2 f2 1 1 3 ・・ 1 2 1 1 2 2 1 2 3 1 3 1 1 3 2 ・・ のようなデータがあって、 例えばzが1だけのx,y,fだけで3次元サーフェスプロットを書きたいのですが、 Rだとそういったことはもしかしてできたりしますでしょうか? (可能なら他のz=2,z=3でのサーフェスプロットも同時に表示するなど・・) 突然ですいませんがもしよろしければご教示いただけると幸いです http://mevius.5ch.net/test/read.cgi/tech/1340339592/93
96: デフォルトの名無しさん [sage] 2014/08/15(金) 10:42:07.27 ID:keCvNQ07 >>93 > dat <- data.frame(expand.grid(1:3, 1:3, 1:2)[,3:1], as.factor(paste0("f",1:18))) > names(dat) <- c("x", "y", "z", "f") > dat x y z f 1 1 1 1 f1 2 1 1 2 f2 3 1 1 3 f3 4 1 2 1 f4 5 1 2 2 f5 6 1 2 3 f6 [中略] 17 2 3 2 f17 18 2 3 3 f18 というデータがあったとして、 > (dat1 <- dat[dat$z == 1, ]) x y z f 1 1 1 1 f1 4 1 2 1 f4 7 1 3 1 f7 10 2 1 1 f10 13 2 2 1 f13 16 2 3 1 f16 とすればzが1だけのデータになる。これを行をx、列をyとしたときのfの行列を作成してpersp()で表示すればよい。 > m <- matrix(NA, nrow = max(dat1$x), ncol = max(dat1$y)) > for(i in 1:nrow(dat1)){m[dat1[i, 1], dat1[i, 2]] <- dat1[i, 4]} > persp(m) factor型のfを強制的に整数型にしているけど、適宜、自分の思うとおりにアレンジしてくれ。 http://mevius.5ch.net/test/read.cgi/tech/1340339592/96
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.017s