Question

我是ggplot2的新手，并且不太了解继承是如何工作的。我试图在一段时间内创建4种空气污染总和的线图：

## Download dataset to local directory and read into dataframes
if(!file.exists("./pm25")){dir.create("./pm25")}
setwd("./pm25")
fileUrl<-"https://d396qusza40orc.cloudfront.net/exdata%2Fdata%2FNEI_data.zip"
download.file(fileUrl,destfile="./pm25data.zip",method="curl")
unzip("pm25data.zip")
NEI<-readRDS("summarySCC_PM25.rds")

## Subset Baltimore data for 1999 and 2008 and reclassify 'year' and 'type' as factors
NEIsubBalt<-subset(NEI,NEI$fips=="24510"&(NEI$year==1999|NEI$year==2008))
NEIsubBalt$year<-as.factor(NEIsubBalt$year)
NEIsubBalt$type<-as.factor(NEIsubBalt$type)

## Load ggplot2 library and build plot
library(ggplot2)
png("plot2.png",width=480,height=480)
   g<-ggplot(NEIsubBalt,aes(year,Emissions),mapping=aes(group=type,color=type))
      g+ggtitle("Total PM2.5 Emissions for Baltimore by Type")  
      g+stat_summary(aes(year,Emissions),fun.y="sum",geom="line",lwd=1,inherit.aes=TRUE)
dev.off()

这会创建折线图，但会覆盖标题： enter image description here 如果我在创建线图后尝试添加标题，则会覆盖该图。有人可以解释这个函数是如何工作的，并且可以用于使ggplot如此有用的调用链接中吗？谢谢！

请问解释stat_summary继承？

0 个答案: