0

説明変数が のみである一部のデータに対して回帰モデルを使用しています1,2,3,4 and 5。5 つの説明変数と 1 つの従属変数があります。例えば、

set.seed(2)
x1 <- sample(rep(1:5,2))
x2 <- sample(rep(1:5,2))
x3 <- sample(rep(1:5,2))
x4 <- sample(rep(1:5,2))
x5 <- sample(rep(1:5,2))
y <- runif(10,-1,1)

model <- lm(y~x1 + x2 + x3 + x4 + x5)

これらの従属変数と従属変数の間の関係を示す箱ひげ図を作成したいと考えています。Rでそれを行うにはどうすればよいですか？

@Ben から提供されたコードを使用して、ボックス プロットを作成できました。ただ、ストーリーでわからないところがあります。それらが何のためにあるのか分かりますか？これがプロットですここに画像の説明を入力

4

1 に答える 1

2

箱ひげ図が必要な場合は、何に基づいて作成したいかをより詳細に説明する必要があります。(つまり、これはプログラミングサイトです。回帰の結果を箱ひげ図のパラメーター (中心線、フェンス、ひげなど) に変換する方法を指定する必要があります。)

そうは言ってもcoefplot、パッケージの関数を使用しarmてグラフィカルな要約を描くことができます

library(arm)
coefplot(model)

ここに画像の説明を入力

または、よく考えてみると、モデルはニシンである可能性があります。単にデータをプロットしたいだけかもしれません。

d <- data.frame(y,x1,x2,x3,x4,x5)
library(reshape2)
dm <- melt(d,id.var=1)
library(ggplot2)
ggplot(dm,aes(x=value,y=y))+geom_boxplot(aes(group=value))+
    facet_wrap(~variable,nrow=1)

ここに画像の説明を入力

于 2013-01-18T13:57:57.197 に答える