matlab txt写入excel,matlab写入txt、excel 以及关于图的处理

clc,clear

fid1=fopen("x.txt","w");

fid3=fopen("x1.txt","w");

x=[1 123344556778891011111214151516161717171818192021222324242526262728282930303131323333343536363636373838394041414243434445464647474748494950515152535354545556575757586061626263646465666667676868696969707071717273737474757677777879808182828384858686878788888989899091

];

y=[75 78444565396349505932479473534222625217311438404281818379862213131325112710122915307483234333489453537163973941402179243272346855486561505351525956525455633575860459626048564657666677644686975707112437274737418180767778197980188283908485208788889289912084909192

];

xx=[413403383.5381339335317334.5333282247219225280290337415432418444251234225212227256250.5243246314315326327328336336331371371388.5411419411394342342325315342345348.5351348370371354363357351369335381391392395398401405410408415418422418.5405.5405409417420424438438.5434438440447448444.5441440.5445444

];

yy=[359343351377.5376383362353.5342325301316270292335328335371374394277271265290300301306328337367351355350342.5339334335330333330.5327.5344343346342348372374372382380.5377369363353374382.5387382388395381375366361362359360355350351347354356364.5368370364370372368373376385392392381383385381.5380360

];

r=zeros(max(x),max(y));

for i=1:140

r(x(i),y(i))=1;

r(y(i),x(i))=1;

end

ii=1;

for i=1:140

d(x(i),y(i))=sqrt((xx(x(i))-xx(y(i)))^2+(yy(x(i))-yy(y(i)))^2);

d(y(i),x(i))=sqrt((xx(x(i))-xx(y(i)))^2+(yy(x(i))-yy(y(i)))^2);

dd(ii)=d(x(i),y(i));

ii=ii+1;

end

for i=1:92

for j=1:92

if d(i,j)==0

d(i,j)=inf;

end

end

end

for i=1:92

d(i,i)=0;

end

for k=1:92

for i=1:92

for j=1:92

if d(i,k)+d(k,j)=30

d_92(i,j)=0;

end

end

end

xlswrite("1.xlsx",d_92)

fclose(fid1);

fclose(fid3);