| 查看: 1124 | 回复: 3 | |||
| 【悬赏金币】回答本帖问题，作者阿毛虫将赠送您 20 个金币 | |||
阿毛虫银虫 (正式写手)
|
[求助]
想请问一下，多分类逻辑回归，这个代码正确吗 已有1人参与
|
||
|
%% Training Betas=MLR(Xtrain,Ytrain); %% Testing Ypred_test=getPredMLR(Betas,Xtest); error_test=getError(Ypred_test,Ytest) Ypred_train=getPredMLR(Betas,Xtrain); error_train=getError(Ypred_train,Ytrain) function [ B ] = MLR( X,Y ) Y_unique=unique(Y); X=[ones(size(X,1),1),X]; d1=length(Y_unique); d2=size(X,2); B=zeros(d1,d2); % Y_unique=unique(Y); for i=1:1:d1 Y_blr=getY_blr(Y,Y_unique(i)); B(i,  =getB(B(i,,X,Y_blr);end end function Bn = getB( X,Y ) Bo=zeros(size(X,2),1);%迭代初始值 for i=1:8 W=getW(X,Bo); Pi=getPi(Bo,X); Bn=Bo + pinv(X'*W*X)*X'*(Y-Pi); Bo=Bn; end Bn=Bo; end function Pi = getPi(Bo,X) Pi=[]; S=size(X,1); % W=zeros(S(1)); for i=1:1:S(1) P=(exp(Bo'*X(i, '));P=P/(1+P); Pi=[Pi,P]; end Pi=Pi'; end function W = getW( X,Bo ) S=size(X); W=zeros(S(1)); for i=1:1:S(1) num=(exp(Bo'*X(i, '));denom=1+num; P=num/denom;%sigmond函数 RP=1-P; % size(W); W(i,i)=P*RP; end end function [ Y_blr ] = getY_blr(Y,i) Y_blr=Y; Y_blr(Y==i)=1; Y_blr(Y~=i)=0; end |
回复此楼» 猜你喜欢
澳大利亚 Murdoch University 全奖博士招生（3个名额）地质化工冶金领域
已经有48人回复
-
欢迎发来filecode的Mz6后的代码验证其规律
已经有29人回复
-
关于Filecode分析方法
已经有12人回复
-
咱们一起用铁证分析2026国家社科基金中标与否
已经有11人回复
-
小木虫上这么多卖论文的，真有人买论文么？感觉没必要啊
已经有10人回复
-
阿姨
已经有4人回复
-
一作与独作在应聘高校教师时区别大吗
已经有4人回复
-
静等基金结果
已经有21人回复
-
FileCode能看出啥？
已经有28人回复
-
有时候，自然基金真的不能太认真 （我的申报经验）
已经有6人回复
阿毛虫
银虫 (正式写手)
- 应助: 0 (幼儿园)
- 金币: 549.7
- 散金: 81
- 帖子: 757
- 在线: 117.2小时
- 虫号: 3313820
- 注册: 2014-07-08
- 性别: GG
- 专业: 机械动力学
2楼2022-01-10 09:24:28
阿毛虫
银虫 (正式写手)
- 应助: 0 (幼儿园)
- 金币: 549.7
- 散金: 81
- 帖子: 757
- 在线: 117.2小时
- 虫号: 3313820
- 注册: 2014-07-08
- 性别: GG
- 专业: 机械动力学
3楼2022-01-10 10:09:28
hzlhm
至尊木虫 (著名写手)
- 应助: 387 (硕士)
- 金币: 17852.5
- 红花: 53
- 帖子: 2880
- 在线: 606.9小时
- 虫号: 1517335
- 注册: 2011-11-30
- 性别: GG
- 专业: 常微分方程与动力系统
4楼2022-01-13 16:17:28
