在节之间分开B样条并比较每件的合身度

Question

我正在研究一些B样条回归（第一度，单结，不是很复杂），并且想要比较之前部分和内部结之后的部分的参数估计。

现在我有这样的事情：

fit <- lm(y ~ bs(x, degree = 1, knots = 20), data = bar)

fit则具有截距估计值和两组参数估计值。

我有兴趣将这两个参数集相互比较 - 是否有人知道划分bs模型对象或提取这两个子模型？或者，将F值转换为R中的p值，以便我可以手动执行这些测试。