R 我的置信区间输出多个观察值

以下链接是我的原始数据集

我已经为它创建了一个线性回归模型。 现在，我想为预测建立一个95%的置信区间，如果“权重=26”

我的代码如下所示：

          MileWeight.lm <-lm(Mydata$Mileage~Mydata$Weight, 
    data = Mydata)
attach(Mydata)
newdata1 <-(Weight=26)

predict(MileWeight.lm, weight= 26  , interval = "confidence")

---

MileWeight.lm它是
Weight
而不是
Weight
。我已经改正了错误。并添加了
predict
的输出。它是
Weight
而不是
Weight
，R区分大小写。请不要
附加
数据。@RuiBarradas对不起，我为“predict”命令发布了错误的命令，我实际上使用的是“newdata1”而不是“Weight=26”。但是在我建立了一个新的线性回归模型并使用随机用户提供的命令之后，这与我从R教程中得到的相同。它不起作用。我使用“attach”是因为R教程使用了它。
newdata1和@RandomUser提供的命令works，它输出答案中的内容。
Mydata <-
structure(list(Weight = c(8, 24.5, 27, 14.5, 28.5, 12.75, 21.25
), Mileage = c(7.69, 4.97, 4.56, 6.49, 4.34, 6.24, 4.45)), class = "data.frame", row.names = c(NA, 
-7L))

MileWeight.lm <- lm(Mileage ~ Weight, data = Mydata)
predict(MileWeight.lm, data.frame(Weight = 26), interval = "confidence")
#       fit      lwr      upr
#1 4.525936 3.922626 5.129246