| 查看: 502 | 回复: 4 | ||
[求助]
帮忙解释加下划线的四句code,谢谢
|
|
Sample Text %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% Sample Text %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% Sample Text |
» 猜你喜欢
酰胺脱乙酰基
已经有9人回复
有时候真觉得大城市人没有县城人甚至个体户幸福
已经有3人回复
CSC & MSCA 博洛尼亚大学能源材料课题组博士/博士后招生|MSCA经费充足、排名优
已经有5人回复
有70后还继续奋斗在职场上的吗?
已经有6人回复
博士延得我,科研能力直往上蹿
已经有7人回复
退学或坚持读
已经有27人回复
面上基金申报没有其他的参与者成吗
已经有5人回复
遇见不省心的家人很难过
已经有22人回复
|
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))); %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 03:55:51
3楼2014-02-09 03:57:07
4楼2014-02-09 12:31:17
5楼2014-02-09 13:06:26













回复此楼