错误：没有为此 S4 类定义 $ 运算符，具有 abline 函数

Question

library(rethinking)
data(Howell1)
d <- Howell1
linear_regression <- map(  
     alist(
     height ~ dnorm(mu, sigma),
     mu <- a + b * log(weight),
     a ~ dnorm(178, 100),
     b ~ dnorm(0, 10),
     sigma ~ dunif(0, 50)   
),    data = d)
 
 plot(height ~ weight, data = d)
 abline(a = coef(linear_regression)["a"], b = coef(linear_regression)["b"])

编织消息显示：

<块引用>

错误：没有为此 S4 类定义 $ 运算符。

但是，有来自 rmarkdown 和 rconsole 的输出。

我不知道发生了什么。

有时编织会成功，有时不会

感谢提前回复