表格合并排序

clear

clc

%% 导入数据 要求表格排版一致 'G:\mATLAB\A.xlsx'

num1=xlsread('G:\mATLAB\A.xlsx','sheet1'); % 输入 表格名为 A.xlsx sheet 1

num2=xlsread('G:\mATLAB\A.xlsx','sheet2');

%% 合并 排序

A=cat(1,num1,num2); % 将两个矩阵合并

X=A(:,1);

Y=A(:,2);

[Xshorted,I]=sort(X);

Yshorted=Y(I);

A1=[Xshorted,Yshorted];

%% 重复行删除

n1=length(num1);

n2=length(num2);

nn=n1+n2; %总行量

p=0;

for i=1:nn-1 % 判断相同行数量

n=A1(i,1);

m=A1(i+1,1);

if m==n

p=p+1;

end

end

n1=A1(nn,1); % 判断两表最末重复行

n2=A1(nn-1,1);

if n1==n2

for k=1:nn-p % 重复行删除

n=A1(k,1);

m=A1(k+1,1);

if m==n

A1(k+1,:)=[];

end

end

else

for k=1:nn-p-1 % 重复行删除

n=A1(k,1);

m=A1(k+1,1);

if m==n

A1(k+1,:)=[];

end

end

end

B1=A1(:,1);

B2=A1(:,2);%清除数字

disp(A1)

plot(B1,B2)