r - マルチカラーの背景、グリッド線からのオフセット値

Question

R を使用して、次のようなグラフを生成したいと考えています。

https://dl.dropboxusercontent.com/u/9297902/R_desired_output.png

スケールは左側の 0 から右側の 100 まであり、各主要カテゴリ (悪い、普通など) が 25% を占めています。必要があると思います: 1. 色の複数の背景ボックスを作成します (#D55E00、#E69F00、#56B4E9、#009E73) 2. グリッド線の色、位置 (私の y カテゴリ値からそれらの間まで)、および厚さを変更します 3.適切なシンボルを選択します (これにより、アウトラインを作成し、バーで塗りつぶすことができますか?)

これが私がこれまでのところです：

# assemble data
metric<-c("Bottom Substrate","Deposition",
   "Substrate Stability","In-stream Cover",
   "Pool Substrate","Pool Quality",
   "Pool Variability","Channel Alteration",
   "Channel Sinuosity","Width/Depth",
   "Hydrolic Diversity","Canopy Cover",
   "Bank Vegetation","Immediate Land Use",
   "Flow Related Refugia")
score<-c(10.53,18.18,13.33,9.09,
   26.32,6.67,6.67,57.14,
   18.18,40.00,27.27,
   9.09,73.33,71.43,27.27)

hab<-data.frame(metric,score) #create data frame

library(ggplot2)

# colorblind friendly colors
# #000000 # Black
# #E69F00 # Orange
# #56B4E9 # Sky Blue
# #009E73 # bluish Green
# #F0E442 # Yellow
# #0072B2 # Blue
# #D55E00 # Vermillion
# #CC79A7 # reddish Purple

# set up to remove x axis values, and axis titles
theme_mod <- theme(axis.text.x = element_blank(),
   axis.title.x = element_blank(), 
   axis.title.y = element_blank()) 

qplot(score,metric) +
   geom_point(aes(score,metric), size=6, pch="|") + # pch gets the symbol I want, how to lose the dot?
   scale_x_continuous(limits=c(0,100)) + # locks scale to be 0-100, whcih I want
   opts(title="Poor                    Fair                       Good                        Excellent") +
   theme_mod # removes axis stuff

だから、私は行く準備ができていません。何らかの理由でデータセットも並べ替えられたようです。

ここで可能性を調べましたが、どちらに進むべきかわかりません：

Rでggplot2を使用して、グラフの背景を異なる地域で異なる色にするにはどうすればよいですか?

申し訳ありませんが、私は少し初心者です - ポインタを事前にありがとう.