删除所有坐标轴值和标签在两个阴谋

Question

我想要删除所有的轴，包括x，左和右y但保留图的边界。 我试图设置xaxt和yaxt到'n'，但没有运气。

library(plotrix) 

twoord.plot(2:10,seq(3,7,by=0.5)+rnorm(9), 
     1:15,rev(60:74)+rnorm(15), 
     type=c("bar","l"), 
     xaxt='n', 
     yaxt='n') 

有什么建议吗？提前致谢。

Answer 1

我不这么认为。这是很容易反正创建这个情节：

library('plotrix') 
set.seed(1) 
x1 <- 2:10 
y1 <- seq(3,7,by=0.5)+rnorm(9) 
x2 <- 1:15 
y2 <- rev(60:74)+rnorm(15) 

par(mfrow = c(1, 3), mar = c(3, 3,2,3)) 
twoord.plot(x1, y1, x2, y2, type=c("bar","l"), xaxt='n', yaxt='n', mar = c(3, 3,2,3)) 

## to recreate 
plot(x1, y1, type = 'n', xlim = range(x2), ylim = range(y1)) 
rect(x1 - .4, 0, x1 + .4, y1, col = 'black') 
par(new = TRUE) 
plot(x2, y2, type = 'l', col = 'red', axes = FALSE) 
axis(4, col.axis = 'red') 

## again with no axes 
plot(x1, y1, type = 'n', xlim = range(x2), ylim = range(y1), axes = FALSE) 
rect(x1 - .4, 0, x1 + .4, y1, col = 'black') 
par(new = TRUE) 
plot(x2, y2, type = 'l', col = 'red', axes = FALSE) 
box()