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))