R中箱图的线性回归

Question

我有这个时间序列的数据

my_data=list()
my_data[["t1"]]=c(1,2,1,2,1,2,3,2,3,2,2,1,1,1,2)
my_data[["t2"]]=c(2,3,2,3,4,1,2,3,2,1,4,4,2,1,3,2,2,3)
my_data[["t3"]]=c(3,4,5,2,3,4,5,4,2,3,4,3,2,3,4,5,5,2)
my_data[["t4"]]=c(4,5,3,3,4,5,5,4,3,2,2,7,8,5)
my_data[["t5"]]=c(6,7,5,6,5,6,7,6,7,6,5,6,7,6,7,7,8,8)
boxplot(my_data)

我想在箱线图之间进行线性回归，并在其上绘制趋势线，可能还有R系数。 如在这个例子中。 非常感谢！

Answer 1

您可以使用lm进行回归，并使用abline

进行绘制

boxplot(my_data)
Meds = data.frame(x = 1:5, y = sapply(my_data, median))
abline(lm(y ~ x, data=Meds))