R：製作分數計/漸變圓弧

Question

我想重新創建一個在Excel中創建的圖形。它基本上是一個分數米或梯度弧，表示某個地區的剝奪分數。因此，它是一個從10到1（紅色到綠色）的梯度計，具有一定值，表示剝奪十分位數。像這樣的圖像。

Deprivation in area gradient arc

我需要建立在R上的相似圖形這將只是讓我改變了剝奪等分和圖形將顯示出來。我試圖玩colorRampPalette和plot，但找不到辦法做到這一點。我並不介意圖表是圓弧還是平面圖形。 PS：我試圖找到一種更好的方式來直觀地表示這種數據，但是找不到任何東西。如果您想到更適合的任何東西，請隨時向我指出。

感謝

Answer 1

我不exatcly知道這是你在找什麼，當然你可以修改，以滿足您的目的，但這裏有一小段代碼，讓你開始。它建立一個從0到100的水平儀表，你所要做的就是選擇值val（這裏是60）和文本sText（這裏是Harborough 003E）。

library(ggplot2) 
val <- 60 ; sText <- "Harborough 003E" 

df <- data.frame(y = seq(0, 100, by = 1), x = 1) 
df.labs <- data.frame(y = c(0, 100, val), 
         lab = c("Most Deprived", 
           "Least Deprived", 
           sText)) 

ggplot(df, aes(x = x, y = y, fill = y)) + 
    geom_tile() + 
    geom_hline(yintercept = val, colour = "blue", size = 1) + 
    geom_text(data = df.labs, aes(x = 1, y = y, label = lab), hjust = c(0, 1, 0.5)) + 
    scale_fill_gradient(low = "red", high = "green", guide = FALSE) + 
    coord_flip() + 
    theme_void() + 
    theme(aspect.ratio = 0.1) 

當然，你可以操縱它asyou認爲合適的，添加刻度標記，值，標題或其他任何你需要的。

產生的情節是：

我希望這有助於。