2012-12-21 108 views
3

我很難用R語言繪製圖表。我想要我的條形圖來聚合deal_count列,但似乎沒有這樣做。不太確定我在這裏錯過了什麼。 deal_count值爲'整數'。我試圖用不同的班級對列進行總結,但沒有運氣。使用geom_bar在ggplot2中求和的問題

也正好運行此

sum(funded.agvc$deal_count) 

不會產生正確的總和.....

ggplot(data=funded.agvc, aes(moved_date,deal_count)) + 
    geom_bar(colour='black', fill="#33CC00", alpha=.5, 
     size=0, width=.7,stat='identity') + xlab("Deal Funded Date") + 
    ylab("Funded Deal Count") + 
    opts(title="Deals funded since January 2011") + 
    facet_grid(grouptype~fundingstage, scales='free_y') + 
    opts(axis.text.x =theme_text(angle=45, size=5)) 

這裏的頭

head(funded.agvc) 
moved_date     industry fundingstage deal_count startup_country startup_state     group_name grouptype 
1 2012-09 MEDICAL_DEVICES_EQUIPMENT  500k-1M   1    CA      Boston Harbor Angels Angel Group 
2 2012-10 BUSINESS_PRODUCTS_SERVICES Product Ready   1    US   MA  Launchpad Venture Group Angel Group 
3 2012-07         Not Set   1    US        Golden Seeds Angel Group 
5 2012-09    IT_SERVICES Product Ready   1    US   NY   STAR Angel Network Angel Group 
6 2012-11      MOBILE Product Ready   1    US   TX Central Texas Angel Network Angel Group 
7 2012-11         Not Set   2            NEST-TN, LLC Angel Group 

和會話信息

R version 2.15.1 (2012-06-22) 
Platform: x86_64-apple-darwin9.8.0/x86_64 (64-bit) 

locale: 
[1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8 

attached base packages: 
[1] stats  graphics grDevices utils  datasets methods base  

other attached packages: 
[1] JavaGD_0.6-1 scales_0.2.3 rJava_0.9-3 ggplot2_0.9.3 

loaded via a namespace (and not attached): 
[1] colorspace_1.1-1 dichromat_1.2-4 digest_0.5.2  grid_2.15.1  labeling_0.1  MASS_7.3-18  memoise_0.1  munsell_0.3  plyr_1.7.1   
[10] proto_0.3-9.2  RColorBrewer_1.0-5 reshape2_1.2.1  stringr_0.6.1  tools_2.15.1  

而且dput

structure(list(moved_date = c("2012-09", "2012-10", "2012-07", 
"2012-09", "2012-11", "2012-11"), industry = c("MEDICAL_DEVICES_EQUIPMENT", 
"BUSINESS_PRODUCTS_SERVICES", "", "IT_SERVICES", "MOBILE", "" 
), fundingstage = c("500k-1M", "Product Ready", "Not Set", "Product Ready", 
"Product Ready", "Not Set"), deal_count = c(1L, 1L, 1L, 1L, 1L, 
2L), startup_country = c("CA", "US", "US", "US", "US", ""), startup_state = c("", 
"MA", "", "NY", "TX", ""), group_name = c("Boston Harbor Angels", 
"Launchpad Venture Group", "Golden Seeds", "STAR Angel Network", 
"Central Texas Angel Network", "NEST-TN, LLC"), grouptype = c("Angel Group", 
"Angel Group", "Angel Group", "Angel Group", "Angel Group", "Angel Group" 
)), .Names = c("moved_date", "industry", "fundingstage", "deal_count", 
"startup_country", "startup_state", "group_name", "grouptype" 
), row.names = c(1L, 2L, 3L, 5L, 6L, 7L), class = "data.frame") 
+1

我們可以有一個重複的例子嗎? http://tinyurl.com/reproducible-000。 「不產生適當的總和」意味着什麼? (不是'stat =「sum」''而不是'stat =「identity」'做你想做的事情嗎?) –

+0

你可以給我們'dput(head(funded.avgc))'...嗎? –

回答

2

如果我改變stat='identity'stat='sum'(情節有點傻,因爲我只用數據的頭,如同上面貼),這對我的作品。我得到opt VS themetheme_text VS element_text警告,因爲我使用的更近的一個版本ggplot2 ...

ggplot(data=funded.agvc, aes(moved_date,deal_count)) + 
    geom_bar(colour='black', fill="#33CC00", alpha=.5, 
     size=0, width=.7,stat='sum') + xlab("Deal Funded Date") + 
    ylab("Funded Deal Count") + 
    opts(title="Deals funded since January 2011") + 
    facet_grid(grouptype~fundingstage, scales='free_y') + 
    opts(axis.text.x =theme_text(angle=45, size=5)) 

enter image description here

+0

我仍然收到錯誤: 錯誤在'[<。data.frame'('* tmp *',nl,value = list(size = c(0.5,0.25,: 替換元素8有2行,需要3 – RomainD

+0

難以診斷,因爲它是不可複製的:如果您還沒有閱讀上述評論中可重複示例的鏈接,請這樣做......如果您只是使用'tmpdata < - head(funded.agvc)'?如果是這樣,那麼問題出在你的其他數據集上。我所知道的唯一的另一個區別是我使用了更新版本的'ggplot2',但我認爲這就是不可能是問題(你可以嘗試'update.packages()'雖然...) –

相關問題