楼主: xiaxl19
659 0

求帮忙查看代码是否有问题 [推广有奖]

  • 0关注
  • 0粉丝

等待验证会员

初中生

28%

还不是VIP/贵宾

-

0%
威望
0 级
论坛币
17 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
53 点
帖子
3
精华
0
在线时间
21 小时
注册时间
2019-12-2
最后登录
2022-4-1
楼主
xiaxl19 发表于 2019-12-12 13:04:50 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币
DeptA=berk.data[which(Dept=='A'),]
TABLEA<-xtabs(Freq~Gender+Admit,data=DeptA)
TABLEA
fit1 <- xtabs(~Gender+Admit,data=TABLEA)
chisq.test(fit1)
原问题是验证odd ratio的theta=1,转化为验证Gender和Admit是否独立。
二维码

扫码加我 拉你入群

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

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

分享0

返回列表
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注jltj
拉您入交流群

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

GMT+8, 2026-2-7 16:23