pailietest.m

来自「滤波器的设计以及零极点对应频率响应分析」· M 代码 · 共 27 行

%试验结论：当投币次数为奇数次时，正反面各占一半的概率最大，即总体分布数近似满足其离散概率分布
%规律

p=1/3;
q=1-p;
for n=1:15
    
    for i=0:n
        
    f1(n,i+1)=pailie(n,i)*(p^i)*(q^(n-i));
    f2(n,(n-i+1))=pailie(n,(n-i))*(p^i)*(q^(n-i));
    end
    
    
end
t=1:50;
%plot3(t,t,f(:,:))
figure(1)
mesh(f1)
figure(2)
mesh(f2)
figure(3)
plot(sum(f1,2),'r')

hold on
plot(sum(f2,2),'b')