楼主: peijianshi
1443 0

[问答] R中两张图做一个tif和三张图做一个tif的问题 [推广有奖]

  • 0关注
  • 16粉丝

已卖:352份资源

副教授

80%

还不是VIP/贵宾

-

威望
0
论坛币
638 个
通用积分
2.3662
学术水平
12 点
热心指数
12 点
信用等级
5 点
经验
15373 点
帖子
636
精华
0
在线时间
568 小时
注册时间
2010-3-11
最后登录
2022-9-8

楼主
peijianshi 发表于 2017-3-2 20:08:20 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

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

感谢您参与论坛问题回答

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

+2 论坛币
1. 现在想把两个panels放在一个tif图上:


    tiff(file=“myplot1.tif", width=144, height=72, units='mm', res=600, compression='lzw', pointsize=5)

    par(mfrow=c(1, 2))

    par(mar=c(6, 5, 2, 2))
    boxplot( a.five~marks, cex.lab=2, cex.axis=2, xlab="",
      ylab="", ylim=c(min(a.five, a0), a.upper), col="grey70",
      names=c("OLS", expression(chi^2), expression(psi^2), "WLS", "MLE"), cex=2, las=3)
    abline(h=a0, lty=2, col=2)
    box()

    par(mar=c(6, 5, 2, 2))
    boxplot( b.five~marks, cex.lab=2, cex.axis=2, xlab="",
      ylab="", ylim=c(min(b.five, b0), b.upper), col="grey70",
      names=c("OLS", expression(chi^2), expression(psi^2), "WLS", "MLE"), cex=2, las=3)
    abline(h=b0, lty=2, col=2)
    box()
  dev.off()


2. 而另外一个像把三个做在一幅tif图上:

    tiff(file=“myplot2.tif", width=216, height=72, units='mm', res=600, compression='lzw', pointsize=5)

    par(mfrow=c(1, 3))

    par(mar=c(6, 5, 2, 2))   
    boxplot( ropt.four~marks, cex.lab=2, cex.axis=2, xlab="", ylab="",
      ylim=c(min(ropt.four, ropt.val), ropt.upper), col="grey70",
     names=c("OLS", expression(chi^2), expression(psi^2), "WLS"), cex=2, las=3)
    abline(h=ropt.val, lty=2, col=2)
    box()

    par(mar=c(6, 5, 2, 2))
    boxplot( topt.four~marks, cex.lab=2, cex.axis=2, xlab="", ylab="",
      ylim=c(min(topt.four, topt.val), topt.upper), col="grey70",
      names=c("OLS", expression(chi^2), expression(psi^2), "WLS"), cex=2, las=3)
    abline(h=topt.val, lty=2, col=2)
    box()

    # win.graph()
    par(mar=c(6, 5, 2, 2))
    boxplot( tmax.four~marks, cex.lab=2, cex.axis=2, xlab="", ylab="",
      ylim=c(min(tmax.four, tmax.val), tmax.upper), col="grey70",
      names=c("OLS", expression(chi^2), expression(psi^2), "WLS"), cex=2, las=3)
      abline(h=tmax.val, lty=2, col=2)
    box()

  dev.off()


结果发现做出的tif图上,坐标的xlab和ylab不一样大,十分恼人。有没有好的办法,是的图形显示的xlab和ylab的一样大小?是不是我设置的par(mar=c(6,5,2,2))出了问题,谢谢!
二维码

扫码加我 拉你入群

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

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

关键词:compression Expression compress express BOXPLOT

R万岁!

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2025-12-24 12:33