1
4

1 回答 1

1

没有ggplot我以前那样做,但我认为有更聪明的方式

all <- read.table(header = TRUE, stringsAsFactors = FALSE, text = "lab      year        production

                  1        2010        1
                  1        2011        0.3222
                  1        2012        0.3305
                  2        2010        0.3400
                  2        2011        0.3310
                  2        2012        0.3310
                  3        2010        0.3400
                  3        2011        0.3403
                  3        2012        0.3410")




ar <- data.frame(year = unique(all$year), prod = tapply(all$production, list(all$year), FUN = sum))
barplot(ar$prod)

在此处输入图像描述

于 2015-11-11T12:01:42.660 回答