同一系列的两条趋势线
Two trendlines for the same series
你好，我有一个 1950 年到 2017 年人均 gdp 的年度系列，我想在同一个散点图上绘制两条不同时期的趋势线，以显示平衡增长路径的变化，一条趋势线将用于1950年到1977年，1995年到2016年，这可能吗？
gdp_mex_ts<-ts(data$log_pib_mex, start = 1950, end =2017 )
trend<-lm(data$log_pib_mex~data$ï..Year)
plot(gdp_mex_ts,type= "o")
abline(trend)
我想在该散点图上添加两条不同的趋势线（1950 年至 1977 年和 1995 年至 2016 年）以进行比较。
这里是一个数据示例：
head(data)
ï..Year log_pib_us log_pib_mex
1 1950 10.49388 9.699450
2 1951 10.52621 9.766078
3 1952 10.55047 9.802166
4 1953 10.58458 9.764262
5 1954 10.59741 9.858383
6 1955 10.64326 9.926464
我使用下一个代码解决了它：
gdp_mex_ts<-ts(data$log_pib_mex, start = 1950, end =2017 )
df1<-subset(data, date <= 1977)
trend1<-lm(df1$log_pib_mex~df1$date)
df2<-subset(data, date>=1995)
trend2<-lm(df2$log_pib_mex~df2$date)
plot(gdp_mex_ts,type= "o", xaxt = "n")
axis(1, at = seq(1950, 2017, by = 5), las=2)
abline(trend1, col="red")
abline(trend2, col="blue")
enter image description here
你好，我有一个 1950 年到 2017 年人均 gdp 的年度系列，我想在同一个散点图上绘制两条不同时期的趋势线，以显示平衡增长路径的变化，一条趋势线将用于1950年到1977年，1995年到2016年，这可能吗？
gdp_mex_ts<-ts(data$log_pib_mex, start = 1950, end =2017 ) trend<-lm(data$log_pib_mex~data$ï..Year) plot(gdp_mex_ts,type= "o") abline(trend)
我想在该散点图上添加两条不同的趋势线（1950 年至 1977 年和 1995 年至 2016 年）以进行比较。
这里是一个数据示例：
head(data)
ï..Year log_pib_us log_pib_mex
1 1950 10.49388 9.699450
2 1951 10.52621 9.766078
3 1952 10.55047 9.802166
4 1953 10.58458 9.764262
5 1954 10.59741 9.858383
6 1955 10.64326 9.926464
我使用下一个代码解决了它：
gdp_mex_ts<-ts(data$log_pib_mex, start = 1950, end =2017 )
df1<-subset(data, date <= 1977)
trend1<-lm(df1$log_pib_mex~df1$date)
df2<-subset(data, date>=1995)
trend2<-lm(df2$log_pib_mex~df2$date)
plot(gdp_mex_ts,type= "o", xaxt = "n")
axis(1, at = seq(1950, 2017, by = 5), las=2)
abline(trend1, col="red")
abline(trend2, col="blue")
enter image description here