雷达RD谱

%% Pulse Doppler Processing
clear,clc,close all;
N = 4096;
N_PRT = 64;
Tp = 10e-6;
T_PRT = 100e-6;
f0 = 10e9;
fs = 100e6;
B  = 10e6;
kr  = B/Tp;
v0  = 60;
R0 = 3000;
c  = 3e8;
t = (0:N-1)/fs;
r = c*t/2;
m = 0:N_PRT-1;
v = (m-N_PRT/2)/N_PRT /2/T_PRT *c/f0;
s = zeros(N_PRT,N);
s_pd = zeros(N_PRT,N);
noise = zeros(N_PRT,N);
np = zeros(N_PRT,N);
n_pd = zeros(N_PRT,N);
SNR = 10;