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)
