|
global pathname filename sf nfft outfile;
fid=fopen([pathname filename],'r');
x=fscanf(fid,'%f',[1,inf]); %输入数据存成行向量
status=fclose(fid);
m=str2double(inputdlg('请输入相关数据长度(点数)'));
nt=length(x(1,:));
h=findobj('Tag','cypl');
sf=str2double(get(h,'string'));
%建立离散时间向量
t=0:1/sf:(nt-1)/sf;
%计算自相关函数向量
a=xcorr(x(1,:),m);
%取正频段的相关函数
y=a(m+1:2*m+1);
%绘制输入数据的时程曲线图
plot(findobj('tag','axes1'),t,x);
xlabel('时间(s)');
ylabel('幅值');
title('输入数据的时程曲线图');
%grid on;
%绘制相关函数曲线图
t=1:(m+1);
plot(findobj('tag','axes2'),t,y);
title('自相关函数');
outfile=y; |
评分
-
1
查看全部评分
-
|