Dokument [PDF, 9,1 MB] - FB 4 Allgemein - Fachhochschule ...

20. Anhang 215
20.15.3 Mat_multiread_Mittelung.m
%---------------------------------------------------------------
%- Mat_multiread_Mittelung.m
%- Programm zum Einlesen und Mitteln der MAT-Ergebnisdateien
%- 17.03.2003 Terence Klitz
%---------------------------------------------------------------
%- Mit diesem Programm werden die APS, die Terzspektren LpG(t)-Diagramme
%- der eingelesenen MAT-Dateien gemittelt.
%- Für jeden eingelesen Dateisatz wird eine MAT-Datei mit
%- den gemittelten Werten ausgegeben. Die Dateien des Satzes
%- werden nacheinander eingelesen.
%-
%- Hintergrund sind die Messungen am Drehkanal.
%- Es wurden bei einer Drehkanalkonfiguration mehrere Aufnahmen
%- bei Rechts- und Linksdrehungen durchgeführt. Zur Reduktion
%- der Datenmengen wurde überlegt, die Spektren der Rechtsdrehung
%- und der Linksdrehung jeweils zu mitteln.
%-
%- Am Ende eines Durchlaufs wird eine MAT-Datei mit den
%- gemittelten Werten geschrieben:
%- [Stammname]mittel_[anhang].MAT
%- Der String „anhang“ muss eingegeben werden.
%- Nach einem Durchlauf kann ein neuer Satz Dateien eingelesen
%- werden, der gemittelt werden soll.
%---------------------------------------------------------------
clear all;
close all;
clc;
ant_satz = 1;
satz = 0;
while ant_satz == 1
close all;
%- Angabe einer Beschreibung, diese wird dem Dateinamen hinzugefügt
%- Bitte auch die Information über den Kanal angeben, weil diese
%- nicht automatisch beigefügt wird.
anhang = input('Beschreibung des Satzes: ','s');
satz = satz + 1;
newplot
hold off
m_1 = menu('Bitte machen Sie eine Wahl', 'MAT-Datei einlesen', ↵
'Abbruch');
i = 0;
k = 0;
if m_1 == 1; %- MAT-Datei einlesen
ant_dat = 1
while ant_dat == 1
i = i + 1;
k = k +1;
[dateiname, pfad] = uigetfile('*.mat', 'MAT-Ergebnisdatei ↵
wählen');
mat_datei = strcat(pfad,dateiname);
load(mat_datei);
cd(pfad);
Fachhochschule Düsseldorf Diplomarbeit 2002/03, Terence Klitz