欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 103|回復: 0
打印 上一主題 下一主題
收起左側

通信原理Matlab求積分和微分 代碼

[復制鏈接]
跳轉到指定樓層
樓主
ID:1153818 發表于 2025-6-13 00:58 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
這是我的答案(雖然我看不懂)
無論是積分和微分,都有符號和數值兩種操作,符號操作是計算精確解析式和相應的精確值:
符號:
sysm x t---->定義自變量
int(f,x) ---->求f關于x的不定積分
int(g,t) ---->求g關于t的不定積分
int(f,x,a,b) ---->求f關于x在[a,b]上的定積分
diff(f,x,n) ---->求f關于x的n階導數

數值方法:
數值微分:
#用函數值的差分除以自變量的差分(只要步長足夠小,就足夠精確)
diff(y). /diff(x),但是會比原函數的維度少一位
數值積分:
#數值積分可以基于不同的積分準則,如:中點法則、梯形法則、辛普森法則等,因此也有不同的函數
1.    基于自適應 Simpson 積分法計算數值積分(不推薦)
如:計算,可以:
,F為待計算函數句柄(匿名)
2.    基于自適應Gauss-Lobatto方法(不推薦)
和quad一樣的用法,把quad換成quadl
3.    基于高斯-勒讓德積分方法(和integral的積分方法基本相同)
和quad一樣的用法,把quad換成quadgk
4.    基于全局自適應積分法(推薦)
與quad一樣的用法,將quad換成integral
5.    基于梯形積分法

  1. %研究各種信號的抗噪聲性能(直接引用前幾個文件的基礎代碼)
  2. clear all;
  3. close all;
  4. %tips: biterr函數、randn函數
  5. %-------------------------ASK---------------------------
  6. %----原始信號碼元參數----
  7. Tb = 1; %碼元長度
  8. fs = 100; %采樣頻率
  9. dt = 1/fs; %采樣時間間隔
  10. N = 1e5; %碼元數量,數量大,便于統計,避免較少的碼元數帶來的偶然性
  11. t = 0:dt:(N*fs-1)*dt; %時域范圍

  12. %----載波參數----
  13. Ac = 1; %載波幅度
  14. fc = 30; %載波頻率
  15. phi = 0; %初始相位

  16. %----產生原始的二進制碼元----
  17. sr = (sign(randn(1,N))+1)/2; %原始信息序列
  18. sr_conv = zeropad(sr,fs);
  19. nrz = ones(1,fs); %單個NRZ波形
  20. data = conv(sr_conv,nrz);
  21. data = data(1:length(t));

  22. %----產生ASK信號----
  23. carrier = cos(2*pi*fc*t);
  24. ask = data.*carrier;
  25.    
  26. %----匹配濾波----
  27. r_db = 0:15; %信噪比-dB
  28. Eb = Tb*Ac*Ac/2; %單個比特的信號功率(J/bit)
  29. pe = zeros(1,length(r_db));
  30. pe_ideal = zeros(1,length(r_db));
  31. for i=1:length(r_db)
  32.     r = 10^(r_db(i)/10);
  33.     n0 = Eb/r; %單邊噪聲功率譜密度
  34.     delta = n0/2*fs; %噪聲功率
  35.     n = sqrt(delta)*randn(1,length(ask)); %噪聲信號
  36. %     reciv = awgn(ask,r_db(i)); %也可以這樣
  37.     reciv = ask+n; %接收信號
  38.    
  39.     %匹配濾波器
  40.     t1 = 0:dt:Tb-dt;
  41.     h = cos(2*pi*fc*t1);
  42.    
  43.     %濾波
  44.     recov_signal = conv(reciv,h)*dt;
  45.    
  46.     %包絡檢波
  47.     t2 = 0:dt:(length(recov_signal)-1)*dt;
  48.     z = hilbert(recov_signal); %z為解析信號
  49.     z1 = z.*exp(-sqrt(-1)*2*pi*fc*t2); %z1為復包絡
  50.     envlp = abs(z1);
  51. %     subplot(2,1,1);
  52. %     plot(t,data);
  53. %     subplot(2,1,2);
  54. %     plot(t2,recov_signal);
  55.    
  56.     %判決
  57.     recov_sym = zeros(1,N);
  58.     Vth = Ac/4; %判決門限,余弦信號卷積之后,高度會下降一半,故用Ac/4
  59.     for j=1:N
  60.         if envlp(j*Tb/dt) > Vth
  61.             recov_sym(j)=1;
  62.         else
  63.             recov_sym(j)=0;
  64.         end
  65.     end
  66.     [err_num,err_pro] = biterr(sr,recov_sym); %計算誤碼個數和誤碼率
  67.     pe(i)=err_pro;
  68.     pe_ideal(i) = 0.5*erfc(sqrt(0.25*r));
  69.     %pe_ideal(i) = 0.5*exp(-0.25*r);
  70. end

  71. figure();
  72. semilogy(r_db,pe,'-*');
  73. hold on;
  74. semilogy(r_db,pe_ideal);
  75. legend('實際誤碼率','理論誤碼率');
  76. grid on;

復制代碼
  1. % 評估二進制單極性和雙極性基帶系統的抗噪性能
  2. SNR_dB = 0:0.05:10;
  3. scal = 10.^(SNR_dB/10); %信噪比的比例形式

  4. A_over_sigma = sqrt(scal)*sqrt(2);
  5. double = 0.5*erfc(sqrt(scal));
  6. single = 0.5*erfc(0.5*sqrt(scal));

  7. figure('NumberTitle', 'off', 'Name','相同抽樣電平下兩種數字基帶系統的抗噪聲能力');
  8. semilogy(A_over_sigma,double);
  9. hold on;
  10. semilogy(A_over_sigma,single);
  11. xlabel('抽樣電平/噪聲均方值');
  12. ylabel('系統誤碼率Pe');
  13. grid on;
  14. legend('雙極性','單極性');

  15. %tips:數字基帶系統的抗噪性能(不考慮碼間干擾,受噪聲引起的誤碼率)與信號碼元抽樣電平的值與噪聲均方根值(功率開方,即高斯噪聲的方差開方)之比有關
  16. %如果是理想的方波碼元,功率為A

  17. %第4-5行其實是驗證了兩種編碼方式:相同的電平值A和噪聲均方值下不同的抗噪表現,而不是相同的信噪比條件下,因為如果兩個信號的SNR相同,則兩個信號的電平值也不同

  18. %----驗證相同SNR下不同系統的抗噪性能(此時兩種信號的電平值也不同)-----

  19. double_2 = 0.5*erfc(sqrt(scal)/sqrt(2));
  20. single_2 = 0.5*erfc(sqrt(scal)/2);
  21. figure('NumberTitle', 'off', 'Name','相同SNR下兩種數字基帶系統的抗噪聲能力');
  22. semilogy(SNR_dB,double_2);
  23. hold on;
  24. semilogy(SNR_dB,single_2);
  25. xlabel('SNR(Eb/N0)-dB');
  26. ylabel('系統誤碼率Pe');
  27. grid on;
  28. legend('雙極性','單極性');
復制代碼

代碼下載: Communication-Matlab-main.7z (71.93 KB, 下載次數: 0)

評分

參與人數 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵!

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表