function y = test_rayleigh_pdf(r)
%r為信道幅度絕對值！

sigma_u = sqrt(1/2);
figure

%[x,pdf,cdf] = pdf_cdf_gen(abs(r),40);
[x,pdf,cdf] = pdf_cdf_gen(r,80);

pdf_ideal =(x.*(exp(-(x.*x)./(2*sigma_u*sigma_u))))./(sigma_u*sigma_u);
sigma_u = 1;
pdf_idea2 = raylpdf(x,sigma_u);
plot(x,pdf_ideal,'b',x,pdf_idea2,'g',x,pdf,'r*');grid;
legend('pdf\_ideal：公式計算,B=sqrt(1/2)','pdf\_idea2：raylpdf結果,B=1','實際值');
axis([0,3.5,0,0.9]);xlabel('amplitude');ylabel('pdf');
title('test\_rayleigh\_pdf');
y=0;