R语言画图

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

求画散布图的代码，如图，旁边是散点图，对角线上是箱型图

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：R语言 对角线 散点图 对角线 散点图

听水榭 发表于 2016-11-25 16:01
求画散布图的代码，如图，旁边是散点图，对角线上是箱型图

有木有人

听水榭 发表于 2016-11-25 16:01
求画散布图的代码，如图，旁边是散点图，对角线上是箱型图

求解答

我試了試，您看看結果能不能用。舉例是r自帶數據iris,故可執行看看。
語法如下:
data(iris,package="datasets")
use_data=iris[,-5]

pairplot=function(x,y) plot(x,y,xlab="",ylab="")
box=function(x) boxplot(x)
x=use_data

windows()
par(mfrow=c(4,4))

box(x[,1]);pairplot(x[,1],x[,2]);pairplot(x[,1],x[,3]);pairplot(x[,1],x[,4])
pairplot(x[,2],x[,1]);box(x[,2]);pairplot(x[,2],x[,3]);pairplot(x[,2],x[,4])
pairplot(x[,3],x[,1]);pairplot(x[,3],x[,2]);box(x[,3]);pairplot(x[,3],x[,4])
pairplot(x[,4],x[,1]);pairplot(x[,4],x[,2]);pairplot(x[,4],x[,3]);box(x[,4])

,旁邊高手建議：
library(car)
data=iris[,-5]

scatterplotMatrix(data,var.labels=NULL,diagonal="boxplot",
                  smoother=F,reg.line=F)