签到
- 苹果/安卓/wp
- 苹果/安卓/wp
客户端
0.0

0.00

人大经济论坛 › 论坛 › 数据科学与人工智能 › 数据分析与数据科学 › R语言论坛 › R软件lm函数中R Square是如何计算的？

CDA数据分析研究院

商业数据分析与大数据领航教育品牌



经管云课堂

经管/金融/财会/社科/名师公开课



学术培训

Stata 空间计量 SSCI Python

贵宾：通行论坛特权+数据库权限
+案例库+下载特权 VIP：论坛特权+更多下载次数
+ccerdata数据库+更高阅读权限+……

提升主题| 本版置顶| 关闭主题| 变更主题颜色| 抢沙发| 顶贴| 显身卡| 道具中心

楼主: ltx5151

20512 8

R软件lm函数中R Square是如何计算的？ [推广有奖]

0关注
26粉丝

教授

26%

还不是VIP/贵宾

-

0%

威望: 1 级
论坛币: 48929 个
通用积分: 63.8334
学术水平: 100 点
热心指数: 143 点
信用等级: 68 点
经验: 2871 点
帖子: 529
精华: 0
在线时间: 1312 小时
注册时间: 2009-5-7
最后登录: 2024-5-26

楼主

ltx5151 发表于 2010-9-24 11:38:27 |只看作者 |坛友微信交流群|倒序 |AI写论文

是否 +2 论坛币

k人参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

本人用无截距模型，作一元回归。同时用自己的函数和R中的函数lm运行结果对比，发现参数估计、残差等数据都完全吻合，但是R^2不同。我的是负数（因为此处用无截距方法，出现负数并不意外），下面是我计算的方法，由于这里不方便编辑公式，大家就领会精神吧，用到的都是最常见的那几个量。我运算的方法是1－RSS/SYY. 其中SYY=sum((y-ybar)^2), RSS=sum((y-yhat)^2)。希望各位大人解释一下，谢谢。

二维码

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：Square ARE r软件参数估计无截距软件函数 Square

相关帖子

回帖推荐

ltx5151 发表于6楼查看完整内容

5# vinkwai SYY=t(y-ybar)%*%(y-ybar) RSS=t(y-yfit)%*%(y-yfit) R-Square=1-RSS/SYY ybar是y的均值，yfit是拟合值,这些量都和lm结果相同，只有R-square不同

simplystat 发表于3楼查看完整内容

>modelsummary(model)["r.squared"] >summary(model)[c("r.squared", "adj.r.squared")]

本帖被以下文库推荐

· R语言精彩问答|主题: 828, 订阅: 16

回复

使用道具举报

沙发

trier2006 发表于 2010-9-25 09:29:39 |只看作者 |坛友微信交流群

友情帮顶。

最好的医生是自己，最好的药物是时间……

回复

使用道具举报

藤椅

simplystat 发表于 2010-9-25 12:34:37 |只看作者 |坛友微信交流群

>model<-lm(y~x-1, data=data)
>summary(model)["r.squared"]
>summary(model)[c("r.squared", "adj.r.squared")]

回复

使用道具举报

板凳

ltx5151 发表于 2010-9-25 13:10:41 |只看作者 |坛友微信交流群

3# simplystat
谢谢楼上的回答，可是麻烦看清问题。我不是不会显示lm中的R-square，是不理解我计算和程序中值的差异。

回复

使用道具举报

报纸

vinkwai 发表于 2010-9-25 13:37:12 |只看作者 |坛友微信交流群

4# ltx5151

Please post your code here

回复

使用道具举报

地板

ltx5151 发表于 2010-9-25 14:35:22 |只看作者 |坛友微信交流群

5# vinkwai
SYY=t(y-ybar)%*%(y-ybar)
RSS=t(y-yfit)%*%(y-yfit)
R-Square=1-RSS/SYY

ybar是y的均值，yfit是拟合值,这些量都和lm结果相同，只有R-square不同

回复

使用道具举报

7楼

ltx5151 发表于 2010-9-26 15:36:59 |只看作者 |坛友微信交流群

自己顶一下

回复

使用道具举报

8楼

kk22boy 发表于 2011-4-6 21:14:48 |只看作者 |坛友微信交流群

帮顶一下。。

如果该贴对您有些许帮助，希望你能回复一下或者评一下热心指数！谢谢！

回复

使用道具举报

9楼

shenbaiseshatan

在职认证

发表于 2011-4-7 20:34:03 |只看作者 |坛友微信交流群

要不看下这个函数的代码呢，不就找到它的算法了吗

胜人者有力，自胜者强！

回复

使用道具举报

发帖

本版微信群

加好友,备注cda
拉您进交流群

如有投资本站、合作意向或投放广告，请联系：13661292478（刘老师）

联系客服

邮箱：service@pinggu.org 投诉或不良信息处理：（010-68466864）

京ICP备16021002-2号京B2-20170662号京公网安备 11010802022788号论坛法律顾问：王进律师知识产权保护声明免责及隐私声明