1、去除外围框线
opar <- par(no.readonly = T) par(mfrow = c(2,1)) plot(1:10) plot(1:10, axes = F) par(opar)
2、去除x轴标线
opar <- par(no.readonly = T) par(mfrow = c(2,1)) plot(1:10) plot(1:10,xaxt = "n") par(opar)
3、去除y轴标线
opar <- par(no.readonly = T) par(mfrow = c(2,1)) plot(1:10) plot(1:10,yaxt = "n") par(opar)
4、同时去除x轴、y轴标线
opar <- par(no.readonly = T) par(mfrow=c(2,1)) plot(1:10) plot(1:10, axes = F, frame.plot = T) par(opar)
5、去除x轴lab
opar <- par(no.readonly = T) par(mfrow=c(2,1)) plot(1:10) plot(1:10,xlab ="") par(opar)
6、同时去除x轴、y轴lab
opar <- par(no.readonly = T) par(mfrow=c(2,1)) plot(1:10) plot(1:10,ann = F) par(opar)
