그래프 외부 범례 위치

Question

그래프 외부에 범례를 넣으 려합니다. 당신이 보았을 때 이것은 절반 만 성공한 것입니다.

어디에서 번호를 변경해야합니까?

par(oma = c(0.1,1,0.1,1.5)) 
matplot(Profile2007, type = "l", lty = 1, col = colfunc(12), 
    ylab = "m asl", xlab="Distance along crossprofile [m]") 
legend("topright", inset=c(-0.33,-0.0012), legend=1:12, xpd=T, 
    horiz=F, col=colfunc(12), lty =1) 

Answer 1

재현 가능한 예를 제공하지 않았습니다. 따라서 문제가 무엇이고 어디서 발생했는지 알려주지 마십시오. Profile2007은 무엇입니까? colfunc 란 무엇입니까? 그래서, 우리는 당신이 "반 성공한"것을 볼 수 없습니다.

Profile2007 <- matrix(rnorm(100*12), 100, 12) 

par(oma = c(0.1,1,0.1,1.5)) 
matplot(Profile2007, type = "l", lty = 1, col = rainbow(12), 
     ylab = "m asl", xlab = "Distance along crossprofile [m]") 
legend("topright", inset = c(-0.05,-0.1), legend = 1:12, xpd = TRUE, 
     horiz = TRUE, col = rainbow(12), lty = 1, bty = "n") 

당신이 원하는 무엇인가요 : 어쨌든

, 나를 위해 다음 작품은 좀 데이터를 시뮬레이션 어디?

편집 또는이 당신이 옆에있는 전설하려면 :

Profile2007 <- matrix(rnorm(100*12), 100, 12) 

par(mar = c(5, 4, 4, 6) + 0.1) 
matplot(Profile2007, type = "l", lty = 1, col = rainbow(12), 
     ylab = "m asl", xlab = "Distance along crossprofile [m]") 
legend("right", inset = c(-0.17,0), legend = 1:12, xpd = TRUE, 
     horiz = FALSE, col = rainbow(12), lty = 1, bty = "n") 

Answer 2

대답 해 주셔서 감사를! 죄송합니다. 예제가 내가 원하는 것과 비슷합니다!

색상은 : colfunc < - colorRampPalette (c ("darkblue", "연한")) colfunc

2,007 (12)

12 개 프로파일 라인 (단면 프로파일 축적 로브 통해 실행) 샘플 :

dput (헤드 (Profile07_6)) 구조 (목록 (X12의 = C를 (427.89, 427.89, 427.93, 427.96, 427.98, 428) X11 = C (421.36, 421.34, 421.32, 421.28, 421.22, 421.18), X10 = c (415.81, 415.6, 415.44, 415 X8 = c (380.04, 379.85, 379.64, 379.38, 379.15, 378.96), X7 = c (358.95, 415.03, 414.85), X9 = c (401.35, 401.23, 401.11, 400.94, 400.78, 400.7) 356.13, 359.34, 359.56, 359.78, 359.99), X6 = c (348.31, 348.52, 348.68, 348.83, 348.96, 349.11)), 이름 = c ("X12", "X11", "X10", "X9 ","X8 " "X7 ","X6 ")의 row.names = C (NA, 6L), 클래스 ="data.frame ") 때에는

그래프는 같다

par(tcl=0.5) 
matplot(Profile07_6, type = "l", lty = 1, col = colfunc(7), ylim=c(290,440), 
     ylab = "m asl", xlab="Distance along crossprofile [m]", main ="2007") 
par(tcl=0.5) 
minor.tick(ny=5, nx=2, tick.ratio=0.5) 
abline(h=350, lty=3, col="grey33") 
abline(h=400, lty=3, col="grey33") 
abline(h=300, lty=3, col="grey33") 
abline(h=290, lty=3, col="grey") 
abline(h=310, lty=3, col="grey") 
abline(h=320, lty=3, col="grey") 
abline(h=330, lty=3, col="grey") 
abline(h=340, lty=3, col="grey") 
abline(h=360, lty=3, col="grey") 
abline(h=370, lty=3, col="grey") 
abline(h=380, lty=3, col="grey") 
abline(h=390, lty=3, col="grey") 
abline(h=410, lty=3, col="grey") 
abline(h=420, lty=3, col="grey") 
abline(h=430, lty=3, col="grey") 
abline(h=440, lty=3, col="grey") 
axis(4, at=c(290, 310, 320, 330, 340, 360, 370, 380, 390, 410, 420, 430, 440), 
    labels=c(290, 310, 320, 330, 340, 360, 370, 380, 390, 410, 420, 430, 440), 
    col.axis="grey33", las=0, cex.axis=0.7, tck=0.01, col = "grey33", padj = -2.1)