2017-07-07 54 views
-1

您好所有的R愛好者條形圖偏移和疊加層

我有做的條形圖的一個問題應該是這樣的認爲:

我沒有10點名譽,所以我必須用一個鏈接(在一個類中四個條)http://matma4u.pl/uploads/imgs/pre_1499074482__wyk2.jpg

一般來說,我想同樣的效果

我試圖把四大系列圖表及後期酒吧可惜沒有成功。

我也相信有一個更好的辦法

爲加快我的工作,我從兩個發送數據

dane <- data.frame(kraj=c(1L,2L,3L,4L,5L,6L), 
      rok=c(rep(2010,6),rep(2014,6)), 
       Kat1=c(c(1627,1144,1100,1085,983,639),c(1827,1444,1400,1285,1183,1039)), 
      Kat2=c(c(1500,1244,1168,1110,1002,863), c(1400,1144,1568,1510,999,800)) 
) 
dane 

dane$kraj <- factor(d$kraj, levels=1:6, labels=c("Polska", "Niemcy", "Austria", "Rosja", "Ukraina", "Francja")) 

dane$rok <- factor(d$rok,levels=c(2010,2014)) 

ggplot(dane,aes(x = kraj, y = Kat1)) + 
    geom_bar(stat = "identity", fill = "darkgreen") + 
    geom_text(aes(y = Kat1,label = format(Kat1, big.mark = " ")), vjust = -0.5, hjust = 0.5, cex = 3)+ 
    geom_bar(aes(y = Kat2), width = 0.5, stat = "identity", fill = "green")+ 
    geom_text(aes(y = Kat2,label = format(Kat2, big.mark = " ")),colour = "red", vjust = -0.5, hjust = 0.5, cex = 3) 

我的代碼加入系列(KAT1,KAT2)多年來,沒有標籤是可見的,我不知道如何移動酒吧

我知道圖像中的值是不同的,它們只是例子

請這樣的圖表

+0

您收到的@Jarekzulus什麼錯誤的人來幫助:) – garfbradaz

+0

我不明白這是怎麼回事說的話網站,我也沒有看到任何陰謀。請讓你的問題不言自明。 – GGamba

+0

對不起,我不會講英語很好 – Jarekzulus

回答