728x90
그래프 그려야 되는데 ㅠㅠ
이것저거 찾아보면서 하다가 잘 안되서 좌절중에 득템ㅋㅋㅋㅋㅋㅋㅋㅋㅋㅋ
아 구세주 +_+
좀 더럽게 그려졌넹-.- 이쁘게 바꿔야지 ㅋㅋ
>plot(withdraw, col="red", type='l', ylim=g_range, axes=FALSE, ann=FALSE)> lines(announce, col='blue', lty=5)> axis(1, at=1:58, lab=korea)> axis(2, las=1, at=10*0:g_range[2])
그리는데 사용한 데이터
withdraw [1] 8 6 1 0 0 0 2 0 5 0 0 8 65 40 3 0 0 0 46 28 28 58 53 49 51 48 14 8 0 0 0 0 0 2 0 0 0 0[39] 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6 30
korea [1] 6:00:00 6:05:00 6:10:00 6:15:00 6:20:00 6:25:00 6:30:00 6:35:00 6:40:00 6:45:00 6:50:00 6:55:00 [13] 7:00:00 7:05:00 7:10:00 7:15:00 7:20:00 7:25:00 7:30:00 7:35:00 7:40:00 7:45:00 7:50:00 7:55:00 [25] 8:00:00 8:05:00 8:10:00 8:15:00 8:20:00 8:25:00 8:30:00 8:35:00 8:40:00 8:45:00 8:50:00 8:55:00 [37] 9:00:00 9:05:00 9:10:00 9:15:00 9:20:00 9:25:00 9:30:00 9:35:00 9:40:00 9:45:00 9:50:00 9:55:00 [49] 10:00:00 10:05:00 10:10:00 10:15:00 10:20:00 10:25:00 10:30:00 10:35:00 10:40:00 10:45:0058 Levels: 6:00:00 6:05:00 6:10:00 6:15:00 6:20:00 6:25:00 6:30:00 6:35:00 6:40:00 6:45:00 6:50:00 6:55:00 ... 10:45:00
announce [1] 163 61 77 0 0 0 66 0 20 0 15 119 297 295 36 0 0 2 278 263 120 305 274 286 303 267 56 60 0[30] 0 44 8 1 6 7 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 33 110
728x90
댓글