[R강의] 170. 산점도 점에 좌표와 점이름 출력하는 방법 (bquote)

먼저 산점도를 하나 그려봅시다. 

x=c(1,2,4,4,1)
y=c(1,3,6,2,1)
plot(x,y,xlim=c(0,5),ylim=c(0,6))

 

각 점의 좌표를 먼저 화면에 출력해봅시다. 

x=c(1,2,4,4,1)
y=c(1,3,6,2,1)
plot(x,y,xlim=c(0,5),ylim=c(0,6))

for (i in 1:length(x)){
text(x[i],y[i],labels=paste0('(',x[i],',',y[i],')'),pos=1,cex=0.8)
}

 

각 점의 이름을 순서 대로 P1부터 이름을 붙이겠습니다. $P_1(1,1)$ 과 같은 형태로 출력해봅시다. bquote 에서 ~은 한칸을 띄우고 연결하는 것이고, *은 공백 없이 연결한다는 뜻입니다. 변수를 입력할 때는 .(변수)형태로 입력하면 됩니다. 

x=c(1,2,4,4)
y=c(1,3,6,2)
plot(x,y,xlim=c(0,5),ylim=c(0,6) )

for (i in 1:length(x)) {
  text(x[i], y[i], labels = bquote(P[.(i)]~ '('* .(x[i])*','*.(y[i])*')' ) , pos = 1, cex = 0.8)
}