R（二点：連続性と不連続点）でステップ関数（キャドラッグ）をプロットする

Question

本質的には、複合ポアソン過程をプロットしたいと思います。プロットパラメータを正しく編集する方法がわからないことを除いて、すべてうまく動作します。 私は完全な点で連続点を持ち、不連続点は空の点で点をつけたい。今私はフルドットを管理することができます。

最小限の作業例（プロット10回のジャンプと複合ポアソンパス）

n <- 10 
n.t <- cumsum(rexp(n)) 
x <- c(0,cumsum(rnorm(n))) 
plot(stepfun(n.t, x), xlab="t", ylab="X",do.points = TRUE,pch = 16,col.points = "blue",verticals = FALSE) 

は、どのように私は右に不連続点を追加することができますか？何か案が？

Answer 1

pointsを使用すると、元のプロットの後にポイントを追加できます。

set.seed(2017)  ## For reproducibility 

## Your code 
n <- 10 
n.t <- cumsum(rexp(n)) 
x <- c(0,cumsum(rnorm(n))) 
plot(stepfun(n.t, x), xlab="t", ylab="X", 
    do.points = TRUE,pch = 16,col.points = "blue",verticals = FALSE) 

## Add the endpoints 
points(n.t, x[-length(x)], pch = 1)