使 ggplot 看起来像 R 中的原生图一样漂亮
Making ggplot look as nice as the native plot in R
我已经开始使用 ggplot,因为我听说它比原生绘图功能更灵活,看起来也更好。但是,我的结果 ggplot
图表看起来比 plot
函数差,所以我一定是做错了什么。例如,标签太小而难以辨认,线条上没有任何点,并且比例在默认 plot
函数下看起来更好。我是数据可视化的新手,因此非常感谢任何使图表看起来更好的指南或建议。
与plot
:
plot(table(month(data$DATE)), type="b",
main="Time vs. Freq",
xaxt='n',
xlab="Month",
ylab="Frequency")
axis(1, at=1:9, labels = month.name[1:9])
与ggplot
:
x <- month(data$DATE)
df = data.frame(x)
df$y <- 1
ggplot(df, aes(x, y)) + stat_summary(fun.y = sum, geom = "line") + xlab("Month") + ylab("Freq") + ggtitle("Time vs. Freq")
尚不完全清楚您不喜欢默认的 ggplot2 图的哪些方面,但您是否尝试过其他主题之一?
p <- ggplot(df, aes(x, y)) + stat_summary(fun.y = sum, geom = "line") +
xlab("Month") + ylab("Freq") + ggtitle("Time vs. Freq")
p + theme_bw() # For black/white publications plots
或获取更多主题和体验
install.packages("ggthemes")
library(ggthemes)
p + theme_tufte() # Based on Tufte's ideas
p + theme_stata() # Resembles plots from stata
p + theme_economist() # A la plots in the economist
只是举几个例子。并且可以根据需要对其进行调整
我已经开始使用 ggplot,因为我听说它比原生绘图功能更灵活,看起来也更好。但是,我的结果 ggplot
图表看起来比 plot
函数差,所以我一定是做错了什么。例如,标签太小而难以辨认,线条上没有任何点,并且比例在默认 plot
函数下看起来更好。我是数据可视化的新手,因此非常感谢任何使图表看起来更好的指南或建议。
与plot
:
plot(table(month(data$DATE)), type="b",
main="Time vs. Freq",
xaxt='n',
xlab="Month",
ylab="Frequency")
axis(1, at=1:9, labels = month.name[1:9])
与ggplot
:
x <- month(data$DATE)
df = data.frame(x)
df$y <- 1
ggplot(df, aes(x, y)) + stat_summary(fun.y = sum, geom = "line") + xlab("Month") + ylab("Freq") + ggtitle("Time vs. Freq")
尚不完全清楚您不喜欢默认的 ggplot2 图的哪些方面,但您是否尝试过其他主题之一?
p <- ggplot(df, aes(x, y)) + stat_summary(fun.y = sum, geom = "line") +
xlab("Month") + ylab("Freq") + ggtitle("Time vs. Freq")
p + theme_bw() # For black/white publications plots
或获取更多主题和体验
install.packages("ggthemes")
library(ggthemes)
p + theme_tufte() # Based on Tufte's ideas
p + theme_stata() # Resembles plots from stata
p + theme_economist() # A la plots in the economist
只是举几个例子。并且可以根据需要对其进行调整