| 查看: 297 | 回复: 1 | ||
[求助]
求帮忙解 释四句code
|
|
就这四句 ndr(:,i)=tqp*de+(sqrt(dsv)*sqrt(de)).*dr(:,i); prp2=reshape(prp2',n*nd,6); prp2=mean(reshape((prod(prp2',1))',nd,n),1); f=-sum(sum(log(prp2))); |
回复此楼» 猜你喜欢
不自信的我
已经有11人回复
-
北核录用
已经有3人回复
-
要不要辞职读博？
已经有6人回复
-
实验室接单子
已经有3人回复
-
磺酰氟产物，毕不了业了！
已经有8人回复
-
求助:我三月中下旬出站，青基依托单位怎么办？
已经有10人回复
-
26申博（荧光探针方向，有机合成）
已经有4人回复
-
论文终于录用啦！满足毕业条件了
已经有26人回复
-
2026年机械制造与材料应用国际会议 （ICMMMA 2026）
已经有4人回复
-
Cas 72-43-5需要30g，定制合成，能接单的留言
已经有8人回复
|
整个程序 %Procedure for the likelihood% function f=lpr(x) global de dr pres uptop nd n prp prp2 ndr qp; % Initial Quality Perception; % True Quality Perception; % Detailing Signal Variance; % Initial Quality Variance iqp=x(1); tqp=x(2); dsv=exp(x(3)); iqv=1; ndr=zeros(n*6,nd); qp=ndr; for i=1:nd %Distribution of Signals for each time period% ndr(:,i)=tqp*de+(sqrt(dsv)*sqrt(de)).*dr(:,i); %Mean quality perceptions for each time period% qp(:,i)=((iqp/iqv)+(ndr(:,i)/dsv))./((1/iqv)+(de/dsv)); end %Prescription probability% prp=exp(qp)./(1+exp(qp)); %No prescription probability% nprp=1./(1+exp(qp)); %Choose appropriate probability or 1 depending upon behavior and number of periods physician active in data% prp2=zeros(n*6,nd); for i=1:nd prp2(:,i)=((prp(:,i).*pres)+(nprp(:,i).*(1-pres))).^uptop; end %Reshaping to compute likelihood% prp2=reshape(prp2',n*nd,6); prp2=mean(reshape((prod(prp2',1))',nd,n),1); f=-sum(sum(log(prp2))); |
2楼2014-02-09 14:16:38