Tufte의 축을 달성하기 위해 R 플롯에서 경계선 제거

다음 그래프를 고려하십시오.

x <- 1:100
y1 <- rnorm(100)
y2 <- rnorm(100)+100

par(mar=c(5,5,5,5))

plot(x,y1,pch=0,type="b",col="red",yaxt="n",ylim=c(-8,2),ylab="")
axis(side=2, at=c(-2,0,2))
mtext("red line", side = 2, line=2.5, at=0)

par(new=T)
plot(x,y2,pch=1,type="b",col="blue",yaxt="n",ylim=c(98,108), ylab="")
axis(side=4, at=c(98,100,102), labels=c("98%","100%","102%"))
mtext("blue line", side=4, line=2.5, at=100)

Tufte 스타일을 달성하기 위해 자동으로 생성 된 테두리를 제거하고 축선 만 보존하려면 어떻게해야합니까?

bty="n"두 플롯 명령을 모두 추가하십시오 .

시계열의 frame.plot=FALSE경우 같은 효과를 위해 추가하십시오 .

더 멋진 Tufte 축은 http://www.cl.cam.ac.uk/~sjm217/projects/graphics/를 참조하십시오 .

이 작업은 간단합니다 axes=FALSE. 인수 만 포함하면 됩니다. 치다:

x  <- 1:100
y1 <- rnorm(100)
y2 <- rnorm(100) + 100

windows()
  par(mar=c(5,5,5,5))
  plot(x, y1, pch=0, type="b", col="red", yaxt="n", ylim=c(-8,2), ylab="", axes=F)
  axis(side=2, at=c(-2,0,2))
  mtext("red line", side = 2, line=2.5, at=0)

  par(new=T)
  plot(x, y2, pch=1, type="b", col="blue", yaxt="n", ylim=c(98,108), ylab="", axes=F)
  axis(side=4, at=c(98,100,102), labels=c("98%","100%","102%"))
  mtext("blue line", side=4, line=2.5, at=100)

이것은 히스토그램에서도 동일하게 작동합니다.

windows()
hist(y1, axes=F)

당신이 사용하는 경우

par(bty = 'n') 

동물원을 위해 그것을 줄 것입니다 음모를 호출하기 전에. 또한 플로팅 명령에 전달할 수없는 다양한 상황에서이 문제를 해결할 수도 있습니다.

(그림의 다른 종류의 프레임에 대해서는 par () 도움말에서 bty 옵션을 확인하십시오)

Tufte를 참조하지 않고 플롯에서 테두리를 제거하는보다 일반적인 질문에 대답하고 있습니다.

히스토그램의 경우 btn = 'n'가 경계를 없 got습니다.

히스토그램에서 작동하고 모든 유형의 플롯에서 작동해야하는 해결책은 경계선의 선 유형을 보이지 않게 설정하는 것입니다. lty = "blank"