グラフィックス参考実例集:モザイクプロット
の編集
http://www.okadajp.org/RWiki/?%E3%82%B0%E3%83%A9%E3%83%95%E3%82%A3%E3%83%83%E3%82%AF%E3%82%B9%E5%8F%82%E8%80%83%E5%AE%9F%E4%BE%8B%E9%9B%86%EF%BC%9A%E3%83%A2%E3%82%B6%E3%82%A4%E3%82%AF%E3%83%97%E3%83%AD%E3%83%83%E3%83%88
[
トップ
] [
編集
|
差分
|
バックアップ
|
添付
|
リロード
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
]
-- 雛形とするページ --
(no template pages)
COLOR(red){SIZE(20){グラフィックス参考実例集:モザイクプロット}} ([[グラフィックス参考実例集]]に戻る。[[Rのグラフィックスパラメータ]]を参照する。)~ モザイクプロットは分割表データの度数に対数線形モデルを当てはめた際の、正規化残差を箱の色と大きさ(大きさは度数を表す?)で表現する。 #contents ~ **mosaicplot の例。タイタニック号の生存者の分類 [#y71b4e44] mosaicplot1 <- function () { old.par <- par(no.readonly = TRUE); on.exit(old.par) data(Titanic) mosaicplot(Titanic, main = "Survival on the Titanic", color = TRUE) } #ref(グラフィックス参考実例集:モザイクプロット/mosaicplot1.png, left) **タイタニック号の生存者の分類 (公式表現) [#ke9f0c54] mosaicplot2 <- function () { old.par <- par(no.readonly = TRUE); on.exit(old.par) data(Titanic) mosaicplot(~ Sex + Age + Survived, data = Titanic, color = TRUE) } #ref(グラフィックス参考実例集:モザイクプロット/mosaicplot2.png, left) ** 髪と瞳の色の独立性の検定 [#v902979d] 瞳の色と髪の色が独立とみなした際に期待されるよりも、ブロンドで青い瞳の女性が有意に多く(濃い青、正規化残差が+4以上)、茶色の瞳でブロンドの女性が少な過ぎる(濃い赤、正規化残差が-4以下)ことを示している。 mosaicplot3 <- function () { old.par <- par(no.readonly = TRUE); on.exit(old.par) data(HairEyeColor) mosaicplot(HairEyeColor, shade = TRUE) } #ref(グラフィックス参考実例集:モザイクプロット/mosaicplot3.png, left) ** 性別と髪・瞳の色の間の同時独立性の検定 [#s13f57e4] 男性が茶色の髪と瞳のグループ内で少な過ぎ、茶髪で青い瞳のグループ間で多過ぎる(しかし有意というほどではない) mosaicplot4 <- function () { old.par <- par(no.readonly = TRUE); on.exit(old.par) mosaicplot(HairEyeColor, shade = TRUE, margin = list(c(1,2), 3)) } #ref(グラフィックス参考実例集:モザイクプロット/mosaicplot4.png, left) ** 車のギアとキャブレター数の関係 [#d95ef1a9] mosaicplot5 <- function () { old.par <- par(no.readonly = TRUE); on.exit(old.par) data(mtcars) mosaicplot(~ gear + carb, data = mtcars, color = TRUE, las = 1) } #ref(グラフィックス参考実例集:モザイクプロット/mosaicplot5.png, left)
タイムスタンプを変更しない
COLOR(red){SIZE(20){グラフィックス参考実例集:モザイクプロット}} ([[グラフィックス参考実例集]]に戻る。[[Rのグラフィックスパラメータ]]を参照する。)~ モザイクプロットは分割表データの度数に対数線形モデルを当てはめた際の、正規化残差を箱の色と大きさ(大きさは度数を表す?)で表現する。 #contents ~ **mosaicplot の例。タイタニック号の生存者の分類 [#y71b4e44] mosaicplot1 <- function () { old.par <- par(no.readonly = TRUE); on.exit(old.par) data(Titanic) mosaicplot(Titanic, main = "Survival on the Titanic", color = TRUE) } #ref(グラフィックス参考実例集:モザイクプロット/mosaicplot1.png, left) **タイタニック号の生存者の分類 (公式表現) [#ke9f0c54] mosaicplot2 <- function () { old.par <- par(no.readonly = TRUE); on.exit(old.par) data(Titanic) mosaicplot(~ Sex + Age + Survived, data = Titanic, color = TRUE) } #ref(グラフィックス参考実例集:モザイクプロット/mosaicplot2.png, left) ** 髪と瞳の色の独立性の検定 [#v902979d] 瞳の色と髪の色が独立とみなした際に期待されるよりも、ブロンドで青い瞳の女性が有意に多く(濃い青、正規化残差が+4以上)、茶色の瞳でブロンドの女性が少な過ぎる(濃い赤、正規化残差が-4以下)ことを示している。 mosaicplot3 <- function () { old.par <- par(no.readonly = TRUE); on.exit(old.par) data(HairEyeColor) mosaicplot(HairEyeColor, shade = TRUE) } #ref(グラフィックス参考実例集:モザイクプロット/mosaicplot3.png, left) ** 性別と髪・瞳の色の間の同時独立性の検定 [#s13f57e4] 男性が茶色の髪と瞳のグループ内で少な過ぎ、茶髪で青い瞳のグループ間で多過ぎる(しかし有意というほどではない) mosaicplot4 <- function () { old.par <- par(no.readonly = TRUE); on.exit(old.par) mosaicplot(HairEyeColor, shade = TRUE, margin = list(c(1,2), 3)) } #ref(グラフィックス参考実例集:モザイクプロット/mosaicplot4.png, left) ** 車のギアとキャブレター数の関係 [#d95ef1a9] mosaicplot5 <- function () { old.par <- par(no.readonly = TRUE); on.exit(old.par) data(mtcars) mosaicplot(~ gear + carb, data = mtcars, color = TRUE, las = 1) } #ref(グラフィックス参考実例集:モザイクプロット/mosaicplot5.png, left)
テキスト整形のルールを表示する
添付ファイル:
mosaicplot5.png
2596件
[
詳細
]
mosaicplot4.png
2677件
[
詳細
]
mosaicplot3.png
2520件
[
詳細
]
mosaicplot1.png
2853件
[
詳細
]
mosaicplot2.png
2613件
[
詳細
]