产生雷达信号，雷达信号聚类分选

产生雷达信号，对雷达信号进行聚类分选，并比较分选结果

function [pdw_lbjPDW_shengyu]=julei_shengyu（PDW）
%实现脉冲聚类并得到已聚类之后的剩余脉冲
%PDW_LB为所得到的已聚类的脉冲，j为其个数，PDW_shengyu为剩余脉冲
%RFPWK分别为载频、脉宽、脉内调制形式，PDW为要聚类的脉冲
global deta_rf deta_pw W S_menxian
j=1;
L=size（PDW1）;
RF=PDW（:4）‘;
PW=PDW（:2）‘;
K=PDW（:3）‘;
PWD_shengyu=zeros（L5）;
PDW_LB=zeros（L5）; 
PWo=PW（1）;             
RFo=RF（1）;  %设置聚类中心
PDW_LB（1:）=PDW（1:）;    %把第一个脉冲存入已聚类存储器中
m=PDW;
PDW（1:）=[];           %删除已聚类的脉冲
PDW_shengyu=PDW;        %得到剩余脉冲
PDW=m;
for i=2:L
   if K（i）==K（1）;
        deta1=abs（PW（i）-PWo）/deta_pw;
        deta2=abs（RF（i）-RFo）/deta_rf;
        S12=0.5*[deta1 deta2]*W*[deta1 deta2]‘;
        if S12            PWo=（1/（j+1））*（PWo*j+PW（i））;
            RFo=（1/（j+1））*（RFo*j+RF（i））;  %更新类一的中心
            j=j+1;                        %更新类一的脉冲数
            PDW_LB（j:）=PDW（i:）;
            PDW_shengyu（i+1-j:）=[];           %删除已聚类的脉冲，得到聚完一类之后的剩余脉冲
        end
   end
end
pdw_lb=zeros（j5）;
for m=1:j
    pdw_lb（m:）=PDW_LB（m:）;                 %除去多余的存储空间
end

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      10960  2010-03-02 14:54  PW_K\PW_K.m

     文件       1175  2009-11-22 15:32  PW_K\julei_shengyu.m

     目录          0  2010-03-14 19:16  PW_K

----------- ---------  ---------- -----  ----

                12135                    3