用ggplot2改變R中散點圖的背景顏色

我試圖修復這個散點圖，所以背景是白色的，並且沒有網格......這可能嗎？如果這甚至是一個選項，也可以將文本更改爲Open Sans。用ggplot2改變R中散點圖的背景顏色

data$Aspects <- factor(data$Aspects, 
         levels = c("Key Support Areas", 
         "Strategic Support and Relationship Management", 
         "Sales and Marketing Support", 
         "Google AW Account Management and Product Support")) 
library(ggplot2)  
ggplot(data = data, aes(x = X, y = Y, color = Aspects)) + 
    geom_point(size=3) + 
    scale_colour_manual(values = c("blue", "red4", "purple4", "olivedrab")) + 
    geom_text(aes(label = Label), 
       color = "black", hjust=0.4, vjust=1.5, size = 2.5) + 
    labs(x = "Impact on Overall Satisfaction", y = "Higher Rating")

enter image description here

圖像質量更好的版本可以在這裏找到： http://s14.postimg.org/z0z3f3yhd/PSAT_2014_Executive_Summary_Chart_Exclude_AGY.png

來源

2014-06-13 user3735087

這可能是在這裏處理:(輕微編輯）[刪除網格背景]（http://stackoverflow.com/questions/10861773/remove-grid-background-color-and-top-and-right-borders- from-ggplot2） – samhiggins2001

查看此questino字體：http://stackoverflow.com/questions/4094094/modifying-字體在ggplot2 –

您可以關閉網格和背景更改爲白色，theme()

ggplot(data.frame(x=1:10, y=cumsum(rnorm(10))), aes(x,y)) + 
    geom_point() + 
    theme(panel.background=element_rect(fill="white"), 
     panel.grid.major = element_blank(), 
     panel.grid.minor = element_blank() 
)

據我所知，改變字體不是一件容易的事。

來源

2014-06-13 22:49:35 MrFlick

非常感謝，我將如何適應我的代碼？我不是很有經驗...... – user3735087

只需在你已經擁有的「+主題（...）'部分加上 – MrFlick

https://github.com/wch/extrafont –

因此，首先，您的代碼不會按原樣運行：您沒有向我們展示完整的數據幀data。其次，即使是這樣，也不會產生產生的情節，因爲圖例定位不當。

假設你的陰謀被稱爲ggp，如

ggp <- ggplot(data=data,...) + geom_point(...) + geom_text(...) etc.

，並假設開放Sans字體安裝在您（的Windows ...）系統上，那麼這將產生你想要的結果：

windowsFonts(OpenSans=windowsFont("Open Sans")) 
ggp + 
    theme(panel.background=element_blank(), 
     panel.grid.major=element_blank(), 
     panel.grid.minor=element_blank(), 
     text=element_text(family="OpenSans"))

來源

2014-06-14 04:07:19 jlhoward

用ggplot2改變R中散點圖的背景顏色

回答

相關問題