clear
clc
%-----------------讀取數(shù)據(jù)并刪除重復數(shù)據(jù)——————----%
D=textread（‘deathdata.txt‘）;
[m1?n1]=size（D）;
i1=1:m1;
b1=D（i11）-D（i12）;
[X1?Y1]=find（b1==0）;
for?i1=1:m1-1;
????if?i1????????M1（i1:）=D（i1:）;
????else
????????M1（i1:）=D（i1+1:）;
????end
end

%-----------------讀取數(shù)據(jù)并刪除重復數(shù)據(jù)——————----%
E=textread（‘crashdata1.txt‘）;
[m2?~]=size（E）;
i2=1:m2;
b2=E（i21）-E（i22）;
[X2?Y2]=find（b2==0）;
for?i2=1:m2-1;
????if?i2????????M2（i2:）=E（i2:）;
????else
????????M2（i2:）=E（i2+1:）;
????end
end
%--------------繪制散點圖-----------------------------%
%?x1=M1（:2）;
%?y1=M1（:1）;
x2=M2（:2）;
y2=M2（:1）;
figure（1）
scatter（y2x2‘B‘）
hold?on;
%?scatter（y1x1‘R*‘）%繪制散點圖
%?%?hold?off;
xlabel（‘經(jīng)度（東經(jīng)）‘）;
ylabel（‘維度（北緯）‘）;

%———————---------------—采用Kmeans聚類分類-------