plot（）の背景を設定する

Question

私は、水質基準に関連した水質データを表示するためにCDFをプロットしようとしています。

水質基準を明らかにするために、私はrect()を使用して、プロットのどの部分が設定基準内にないかを示しています。

rect()の濃度を使用してハッシュ塗りを作成し、白黒で印刷するとよりうまく動作するようになりました。私は、私が使用したいプロットの一つの領域を持っているとき

これは正常に動作しますrect()：私はプロット内の2本の別々のrect()電話を持っている場合は

は最初rect()は、密度の引数を無視しているようですそして、塗りつぶし使用しています。ここでは

は、私がこれを行うために使用されるコードの例です：

のpH

data.ecdf<-ecdf(data) 
plot(data.ecdf, verticals = TRUE, do.points = FALSE, xaxs = "i", yaxs = "i", xlim=c(5,10), panel.first = rect(5, -0.02, 6, 1.04, density = 20, border = "258", col = "258")) 

plot(data.ecdf, verticals = TRUE, do.points = FALSE, xaxs = "i", yaxs = "i", xlim=c(5,10), panel.first = rect(5, -0.02, 6, 1.04, density = 20, border = "258", col = "258", rect(9,-0.02,10,1.04, density = 20, border = "258", col = "258"))) 

ためのpH

data<-rnorm(30, mean = 7, sd = 1) 

プロットのデータを、私はまたggplot2でこれを実行しようとしましたが、ハッシュ化された塗りつぶしを得ることははるかに困難グラフィックスよりもあるようです。

rect()さんのバックグラウンドでのハッシュ塗り（density = 20）の表示方法についてのご意見やご感想はありがとうございます。

ありがとう！

Answer 1

ないのはなぜそれが起こっているが、あなたはpanel.first引数の中に一度に両方の長方形を呼び出すことができますを確認します。

plot(data.ecdf, verticals = TRUE, do.points = FALSE, xaxs = "i", yaxs = "i", xlim=c(5,10), panel.first = c(
    rect(9,-0.02,10,1.04, density = 20, border = "258", col = "258"), 
    rect(5, -0.02, 6, 1.04, density = 20, border = "258", col = "258") 
)) 

また、層として独立して長方形を呼び出してみてください。

plot(data.ecdf, verticals = TRUE, do.points = FALSE, xaxs = "i", yaxs = "i", xlim=c(5,10), lty='n') 
rect(9,-0.02,10,1.04, density = 20, border = "258", col = "258") 
rect(5, -0.02, 6, 1.04, density = 20, border = "258", col = "258") 
lines(data.ecdf, verticals = TRUE, do.points = FALSE, xaxs = "i", yaxs = "i", xlim=c(5,10))