ギャップのあるデータを途中を省略してプロットする

ギャップのあるデータ 例えばこのようなデータが有るとする。 testdata <- data.frame(x = 1:10, y = c(1,3,2,4,3,21,23,22,24,23)) 前半と後半の間にデータの大きな飛躍があるため、そのままプロットすると前半部、後半部の変化が相対的に小さくなって見難くなる。 ## 通常のplot plot(testdata, type = "b") 実際そうな…