R语言(四) 自定义设置x轴时间刻度值

主要内容：R语言绘制时序图时，自定义设置x轴时间刻度为天/周/月
数据介绍：北京市2020年5月1日至2020年7月31日空气环境质量指数

plot函数绘制

主要思想：删除原有标签，自定义新的时间间隔数据即可

1、设置x轴时间间隔为一周

data<-read.csv('aqi_data.csv')
data$date<-as.Date(data$date)
x_label<-seq(from=as.Date("2020-05-01"),to=as.Date("2020-07-31"),by=7)  #生成新的标签
par(mgp=c(3,0.5,0))  #调整x轴坐标轴与标签距离
plot(data$date,data$AQI,xlab='',xaxt='n',  #删除原有标签ylab='AQI',type='l',main='2020年5月1日-7月31日北京市AQI变化趋势')
axis(1,x_label,format(x_label,"%Y-%m-%d"),las=2) #添加新的标签至坐标轴,las可旋转标签

2、设置x轴时间间隔为两周
修改by=14即可，注意时间如果不够14天的话，并不会以2020年7月31日为结束日期。因此，为标签显示的连续性，加上最后一天

x_label<-c(seq(from=as.Date("2020-05-01"),to=as.Date("2020-07-31"),by=14),"2020-07-31")
par(mgp=c(3,0.5,0))
plot(data$date,data$AQI,xlab='',xaxt='n',ylab='AQI',type='l',main='2020年5月1日-7月31日北京市AQI变化趋势')
axis(1,x_label,format(x_label,"%Y-%m-%d"),las=2)

注：若想X轴标签只显示到月，对%Y-%m-%d进行修改即可（Y-年，m-月，d-天）

ggplot函数绘制

ggplot修改方式较为简单，只需修改scale_x_date(date_breaks = "7 days")即可实现任意时间间隔，前提是x轴变量必须是日期型！

library(ggplot2)
data$date<-as.Date(data$date)
ggplot(data,aes(x=date,y=AQI,color='AQI'))+geom_line(size=1)+scale_x_date(date_breaks = "7 days")+  labs(x='',y='',title='2020年5月1日-7月31日北京市AQI变化趋势')+theme(plot.title = element_text(face="plain",size=10,hjust=0.5),axis.title.x = element_blank(),axis.title.y = element_text(size=10),axis.text.x = element_text(angle = 90,size=10),axis.text.y = element_text(size=10),legend.title=element_blank(),legend.text=element_text(size=10))

总结：两种绘图方式都必须先将x轴变量转为日期型，字符型哒咩

R语言(四) 自定义设置x轴时间刻度值相关推荐

r语言plot函数设置y轴的范围及刻度_R语言之简单绘图
一:引例 plot()是R中为对象作图的一个泛型函数(它的输出将根据所绘制对象类型的不同而变化). 本例中,plot(x, y, type="b")将x置于横轴,将y置于纵轴,绘制 ...
R语言ggplot2可视化：自定义设置X轴上的时间间隔（中断、以年为单位），使用scale_x_date()自定义设置坐标轴间隔和标签、添加标题、副标题、题注信息
R语言ggplot2可视化:自定义设置X轴上的时间间隔(中断.以年为单位),使用scale_x_date()自定义设置坐标轴间隔和标签(Time Series Plot For a Yearly Ti ...
R语言ggplot2可视化线图（line plot）、自定义设置X轴标签为字符串标签，将原有的指定间隔的数字标签替换为指定的字符串标签（change x axis labels into string
R语言ggplot2可视化线图(line plot).自定义设置X轴标签为字符串标签,将原有的指定间隔的数字标签替换为指定的字符串标签(change x axis labels into string ...
R语言ggcharts包的dumbbell_chart函数可视化哑铃图（对比两个年份数据的差异）、scale_y_continuous函数中的labels参数自定义设置X轴坐标标签的格式
R语言ggplot2可视化:使用ggcharts包的dumbbell_chart函数可视化哑铃图(对比两个年份数据的差异).使用scale_y_continuous函数中的labels参数自定义设置X ...
R语言ggplot2可视化设置轴坐标上的数值全部为整数实战：display only integer values on axis
R语言ggplot2可视化设置轴坐标上的数值全部为整数实战:display only integer values on axis 目录 R语言ggplot2可视化设置轴坐标上的数值全部为整数实战:d
R语言编写自定义函数基于ggsumarystats函数计算每个分组的统计值、自定义可视化分组分面条形图，并在X轴标签下方添加分组对应的统计值（样本数N、中位数median、四分位数的间距iqr）
R语言编写自定义函数基于ggsumarystats函数计算每个分组的统计值.自定义可视化分组分面条形图,并在X轴标签下方添加分组对应的统计值(样本数N.中位数median.四分位数的间距iqr) 目录
R语言编写自定义分组统计函数（customize statistics function）可视化分组箱图并在X轴标签下方添加分组对应的统计值（样本数N、中位数median、四分位数的间距iqr）
R语言编写自定义分组统计函数(customize statistics function)可视化分组箱图并在X轴标签下方添加分组对应的统计值(样本数N.中位数median.四分位数的间距iqr) 目录
R语言ggplot2可视化在X轴上可视化时间标签实战：可视化时间标签、对时间标签进行旋转
R语言ggplot2可视化在X轴上可视化时间标签实战:可视化时间标签.对时间标签进行旋转目录
Python使用matplotlib函数subplot可视化多个不同颜色的折线图、使用set_major_formatter函数自定义设置y轴数值标签格式为百分比
Python使用matplotlib函数subplot可视化多个不同颜色的折线图.使用set_major_formatter函数自定义设置y轴数值标签格式为百分比目录

R语言(四) 自定义设置x轴时间刻度值

目录

plot函数绘制

ggplot函数绘制

R语言(四) 自定义设置x轴时间刻度值相关推荐

最新文章

热门文章