inreftra.m

来自「程序计算了国产矩形波导BJ-100的传输特性。通过查阅资料可以知道BJ-100波」· M 代码 · 共 32 行

fp1=fopen('in_abs')
fp2=fopen('in_phase')
fp3=fopen('tra_abs')
fp4=fopen('tra_phase')
fp5=fopen('nTime')
 
x1=fscanf(fp5,'%f')
y1=fscanf(fp1,'%f')
y2=fscanf(fp2,'%f')
y3=fscanf(fp3,'%f')
y4=fscanf(fp4,'%f')

subplot(2,2,1)
plot(x1,y1,'k')
grid on
subplot(2,2,2)
plot(x1,y2,'k')
grid on
subplot(2,2,3)
plot(x1,y3,'k')
grid on
subplot(2,2,4)
plot(x1,y4,'k')
grid on
 

fclose(fp1);
fclose(fp2);
fclose(fp3);
fclose(fp4);
fclose(fp5);