主题:【原创】人类不感谢罗辑--谁是下一位老中医 -- 泉畔人家
library(ggpubr)
GDP <- read.table("https://www.dropbox.com/s/a5ljh29ebo82fld/GDP.txt?raw=1",header = T)
GDP$Log10.GDP = log10(GDP$GDP)
g <- ggscatter(GDP, x = "Year", y = "Log10.GDP",
title = "China GDP since year 1949",
conf.int = TRUE, # Add confidence interval
color = "before.after.78", palette = "jco")+
geom_smooth(aes(color = "before.after.78"), method = lm)+
stat_cor(aes(label = paste(..rr.label.., ..p.label.., sep = "~`,`~"),
color = "before.after.78"))+
theme(plot.title = element_text(hjust = 0.5),
legend.position = "none")
g
原始数据直接复制泉畔人家的帖子,稍作整理。
- 相关回复 上下关系8
🙂人类不感谢罗辑2-建国后的数据分析 16 泉畔人家 字3387 2019-11-18 04:59:36
🙂建议用发电增长速度来比较 hwd99 字331 2022-06-17 21:18:43
🙂指数增长图要用对数坐标,用对数坐标,用对数坐标! 92 冰冻三尺 字1465 2019-11-20 17:30:42
🙂原始数据和code
🙂也解读一下这个图 10 北纬42度 字153 2019-11-21 23:57:19
🙂某人用恶性通胀的方式来解决GDP增长率问题 10 陈王奋起 字96 2019-11-23 01:00:34