在R中的线性回归图中的特定x和y值处插入行

时间:2017-10-06 13:19:17

标签: r plot lm

嘿,我是R的新手并且有一个问题

我有以下数据集由12个不同的债券组成:

dput(Synthetic_bond_creation)
structure(list(`Days to maturity` = c(1419, 202, 1565, 1182, 
2080, 1036, 811, 2436, 1296, 609, 1792, 986), `Yield to maturity` = c(2.699, 
0.487, 4.019, 1.421, 2.394, 1.366, 1.107, 2.717, 1.592, 0.988, 
2.151, 2.278)), .Names = c("Days to maturity", "Yield to maturity"
), class = c("tbl_df", "tbl", "data.frame"), row.names = c(NA, 
-12L))

到目前为止,我得到了以下内容:

library(readxl)
Synthetic_bond_creation <- read_excel("~/UZH/Bachelorarbeit/Synthetic bond 
creation.xlsx")
View(Synthetic_bond_creation)
plot(Synthetic_bond_creation$`Days to maturity`, 
Synthetic_bond_creation$`Yield to maturity`, xlab = "Days to maturity", ylab 
= "Yield to maturity in %", main = "Bonds of 'Societe Generale SA' on 
13.03.2013")
abline(lm (Synthetic_bond_creation$`Yield to maturity` ~ 
Synthetic_bond_creation$`Days to maturity`))

rplotsynthetic

现在我想构建一个合成的5年期债券,这意味着我需要在回归线上的值为x = 1300的到期日和相应的到期收益率y值,即1.951930573舍入到1.95。

我尝试使用:

abline(v=1300) +
abline(h=1.95)

但是我想调整线条,使它们在回归线处结束并且不通过它。此外,如果回归线截距处的x和y值出现在相应的轴

,那将是很好的

我试图&#34;画&#34;我的目标如下:

syntheticbond

1 个答案:

答案 0 :(得分:2)

您可以在绘图和下划线后添加线段。

segments(x0=1300,y0=0,y1=1.95) #vertical line
segments(x0=0, y0=1.95, x1=1300) #horizontal line

默认值为x,y表示起始点(x0,y0)和终点(x1,y1),但由于它们是水平和垂直的,因此分别只更改x或y。您可以照常更改线条类型和颜色,即ltycol

你可能不得不调整两端的值,但你明白了。