新闻中心
用R实现简单线性回归方法并解释其概念
简单线性回归是一种用于研究两个连续变量之间关系的统计方法。其中,一个变量被称为自变量(x),另一个变量被称为因变量(y)。我们假设这两个变量之间存在线性关系,并试图找到一个线性函数,以自变量的特征来准确预测因变量的响应值(y)。通过拟合一条直线,我们可以得到预测的结果。这个预测模型可以用来理解和预测因变量如何随着自变量的变化而变化。
为了理解这个概念,我们可以借助一个薪水数据集,其中包含了每个自变量(经验年限)对应的因变量(薪水)的值。
薪资数据集
年薪和经验
1.1 39343.00
1.3 46205.00
1.5 37731.00
2.0 43525.00
2.2 39891.00
2.9 56642.00
3.0 60150.00
3.2 54445.00
3.2 64445.00
3.7 57189.00
刺鸟创客
一款专业高效稳定的AI内容创作平台
110
查看详情
出于一般目的,我们定义:
x作为特征向量,即x=[x_1,x_2,....,x_n],
y作为响应向量,即y=[y_1,y_2,....,y_n]
对于n次观察(在上面的示例中,n=10)。
给定数据集的散点图
☞☞☞AI 智能聊天, 问答助手, AI 智能搜索, 免费无限量使用 DeepSeek R1 模型☜☜☜
现在,我们必须找到一条适合上述散点图的线,通过它我们可以预测任何y值或任何x值的响应。
最适合的线称为回归线。
以下R代码用于实现简单线性回归
dataset=read.csv('salary.csv')
install.packages('caTools')
library(caTools)
split=sample.split(dataset$Salary,SplitRatio=0.7)
trainingset=subset(dataset,split==TRUE)
testset=subset(dataset,split==FALSE)
lm.r=lm(formula=Salary~YearsExperience,
data=trainingset)
coef(lm.r)
ypred=predict(lm.r,newdata=testset)
install.packages("g
gplot2")
library(ggplot2)
ggplot()+geom_point(aes(x=trainingset$YearsExperience,
y=trainingset$Salary),colour='red')+
geom_line(aes(x=trainingset$YearsExperience,
y=predict(lm.r,newdata=trainingset)),colour='blue')+
ggtitle('Salary vs Experience(Training set)')+
xlab('Years of experience')+
ylab('Salary')
ggplot()+
geom_point(aes(x=testset$YearsExperience,y=testset$Salary),
colour='red')+
geom_line(aes(x=trainingset$YearsExperience,
y=predict(lm.r,newdata=trainingset)),
colour='blue')+
ggtitle('Salary vs Experience(Test set)')+
xlab('Years of experience')+
ylab('Salary')可视化训练集结果

以上就是用R实现简单线性回归方法并解释其概念的详细内容,更多请关注其它相关文章!
# 线性回归
# 中文网
# 如何在网络网站推广产品
# 恩施网站怎么做优化
# 山东网站优化源码工具
# 网站建设聚农
# 二手车如何建立网站推广
# 丽水seo软件推荐招聘
# 奉化网站推广合作商家
# 云梦短视频SEO优化
# 尤溪公司网站建设
# 怎么写网站优化页面标题
# 这两个
# 相关文章
# 迈凯伦
# 是一种
# 免费试用
# 被称为
# 工作流
# 我们可以
# 多维
相关栏目:
【
行业资讯67740 】
【
技术百科0 】
【
网络运营39195 】
相关推荐:
typescript怎么使用vue
openwrt有哪些功能
电信开通nfc功能是什么意思
angluar如何命令删除dist
春运抢票如何快速抢到票
nfc功能是什么意思怎么开启
迅达热水器显示power是什么意思
单片机是怎么计时的
光刻机分类有哪些品牌的
vue组件typescript怎么用
openwrt有什么用
如何引用typescript中的方法
手机如何更改固态硬盘
linux环境中如何使用ping命令
苹果16更新了哪些版本
intel固态硬盘如何安装
python和typescript学哪个
微波炉power中文是什么意思
什么是base64
苹果16改掉了哪些
折叠屏有哪些手机
春运抢票准备什么东西
华为交换机 配置 如何复制命令行
如何用命令连接mysql
nfc近场通讯功能是什么意思
交管12123协议头不完整怎么弄
vue中datediff函数怎么用
春运预约抢票能抢到吗
单片机怎么控制内功率
市盈率ttm是什么意思
怎么下载360桌面壁纸
typescript与es6学哪个
33000日元等于多少人民币
ssd固态硬盘如何安装
折叠屏手机信号哪个最强
debug中如何用n命令命名程序文件名
五十铃x-power是什么意思
j*a怎么让数组倒换
双十一的哪一天最优惠呢
跑步机power键是什么意思
manager是什么意思
如何通过命令检测u盘启动
喇叭上POWER4欧是什么意思
市盈率tt的扣非是什么意思
怎么把手机里爱奇艺的视频下载到u盘里
春运大巴上抢票怎么抢票
苹果16有哪些亮点功能
j*a怎么复制数组中
shell如何注释所有命令
液位传感器power是什么意思


2024-01-22
浏览次数:次
返回列表
gplot2")
library(ggplot2)
ggplot()+geom_point(aes(x=trainingset$YearsExperience,
y=trainingset$Salary),colour='red')+
geom_line(aes(x=trainingset$YearsExperience,
y=predict(lm.r,newdata=trainingset)),colour='blue')+
ggtitle('Salary vs Experience(Training set)')+
xlab('Years of experience')+
ylab('Salary')
ggplot()+
geom_point(aes(x=testset$YearsExperience,y=testset$Salary),
colour='red')+
geom_line(aes(x=trainingset$YearsExperience,
y=predict(lm.r,newdata=trainingset)),
colour='blue')+
ggtitle('Salary vs Experience(Test set)')+
xlab('Years of experience')+
ylab('Salary')