는 R에`pairs`을 사용하여 플롯 행렬의 대각선을 따라 시계열 플로팅

가정하자 I이는 R에`pairs`을 사용하여 플롯 행렬의 대각선을 따라 시계열 플로팅

  edmar2014 edmar2015 edmar2016 
2014-01-02 99.725 99.465 98.585 
2014-01-03 99.735 99.440 98.555 
2014-01-06 99.735 99.445 98.590 
...

닮은 data.frame 난에서 히스토그램의 쌍을 플롯 할 pairs 함수를 사용하고자 가지고 주문. 그러나 이름보다는 대각선을 따라 해당 열에 대한 시계열 (선 그래프)을 갖고 싶습니다. 이를 달성하기 위해 diag.panel 인수를 사용하는 방법을 이해하는 데 문제가 있습니다.

pairs(
    toy_example, 
    diag.panel=function(x) { 
    dates <- as.Date(rownames(toy_example)) 
    par(usr=c(range(dates),range(x)+c(-0.1,0.1))) 
    lines(dates,x) 
    }, 
    text.panel=NULL 
)

이가에 대한 각 열을 나타내는 : 일부 예를 들어 데이터는 당신이 같이 lines를 호출 한 다음 대각선으로 플롯 영역의 usr 크기를 재설정하고 거기 얻을 수

toy_example <- structure(list(edmar2014 = c(99.725, 99.735, 99.735, 99.735, 
99.735, 99.735, 99.74, 99.745, 99.75, 99.75, 99.745, 99.75, 99.75, 
99.75, 99.745, 99.74, 99.745, 99.745, 99.745, 99.745), edmar2015 = c(99.465, 
99.44, 99.445, 99.45, 99.405, 99.395, 99.46, 99.49, 99.46, 99.435, 
99.445, 99.445, 99.46, 99.425, 99.47, 99.48, 99.48, 99.495, 99.515, 
99.52), edmar2016 = c(98.585, 98.555, 98.59, 98.605, 98.465, 
98.465, 98.605, 98.67, 98.595, 98.54, 98.56, 98.56, 98.545, 98.48, 
98.62, 98.665, 98.625, 98.67, 98.71, 98.695)), .Names = c("edmar2014", 
"edmar2015", "edmar2016"), row.names = c("2014-01-02", "2014-01-03", 
"2014-01-06", "2014-01-07", "2014-01-08", "2014-01-09", "2014-01-10", 
"2014-01-13", "2014-01-14", "2014-01-15", "2014-01-16", "2014-01-17", 
"2014-01-21", "2014-01-22", "2014-01-23", "2014-01-24", "2014-01-27", 
"2014-01-28", "2014-01-29", "2014-01-30"), class = "data.frame")

출처

2014-09-09 crf