R语言OLS回归线的代码

在R语言中，要执行普通的最小二乘法（Ordinary Least Squares，OLS）线性回归，首先需要安装并加载相应的包，如`stats`包内已经包含了这个功能。假设我们有一个名为`data`的数据框，其中包含两个变量`x`（自变量，例如`sqrft`）和`y`（因变量，例如`price`），我们可以按照以下步骤编写代码：

# 加载数据（这里假设有数据集data）
# data <- read.csv("your_data_file.csv")  # 如果是从文件读取数据，替换为真实路径

# 确保你的数据集中有"x"和"y"列
# x <- data$sqrft
# y <- data$price

# 使用lm()函数进行线性回归
ols_model <- lm(y ~ x, data = data)

# 查看模型摘要
summary(ols_model)

在这个例子中，`lm()`函数用于创建一个线性回归模型，`~`表示“依存于”，`y ~ x`表示`y`依赖于`x`。`data = data`指定了数据源。`summary()`函数会提供模型的统计信息，包括截距、斜率以及一些重要的检验结果。

如果需要预测新数据点的价格，可以使用`predict()`函数：

new_sample_sqrft <- 2438  # 新的房间面积值
predicted_price <- predict(ols_model, newdata = data.frame(x = new_sample_sqrft))
predicted_price

这会返回使用模型预测的新住房价格。