# # # R代码从装饰图案的flowMeans来源。Rnw“# # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #代码块1号:stage0 # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #库(flowMeans) # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #代码块2号:stage1 # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #数据(x) res < - flowMeans (x, varNames = c (“FL1。FL2 H”。”FL3 H”。”H”、“FL4.H”), MaxN = 10) # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #代码块3号:stage2 # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #情节(x [c(3, 4)],坳= res@Labels [[1]], pch = 20);# # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #代码块数量4:stage3 # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #地块(res@Mins xlab =“迭代”,ylab =‘距离’)# # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #代码块5号:stage4 # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #地块(res@Mins xlab = ' ', ylab = ' ', xlim = c (1, res@MaxN) ylim = c(0,马克斯(res@Mins)))英国《金融时报》< -changepointDetection (res@Mins) abline(英尺l1美元)abline(英尺l2美元);票面价值(新= TRUE)情节(英尺MinIndex + 1美元,res@Mins(英尺MinIndex + 1美元),坳=‘红’,xlab =“迭代”,ylab =‘距离’,xlim = c (1, res@MaxN), ylim = c(0,马克斯(res@Mins)), pch = 19);# # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #代码块6号:stage5 # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #地块(x, res, c (“FL1。FL2 H”。”H")) ################################################### ### code chunk number 7: stage6 ################################################### plot(x, res, c("FL1.H", "FL2.H","FL3.H", "FL4.H"),pch='.')