readdata.m

来自「基于TKGK实验台的实验数据编码」· M 代码 · 共 26 行

%function [A2,A1]=readdata()
 
connA=database('mydata','','');
 
colname={'d3','T'};
 
cursorA=exec(connA,'select d3,T from Data');

BB=fetch(cursorA);
%numrows=rows(cursorA);
%colSA=cols(BB);
AA1=BB.data;
%A2=cat(1,AA1{:,2});
for i=1:818
   A1(i)=str2num(cat(1,AA1{i,1}));
end

close(BB);
   
close(connA);
 f11=fopen('data0827.txt','w');
c=fwrite(f11,A1,'float');
fclose(f11);