22.07.2013 Aufrufe

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

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

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

MEHR ANZEIGEN
WENIGER ANZEIGEN

Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.

YUMPU macht aus Druck-PDFs automatisch weboptimierte ePaper, die Google liebt.

20. Anhang 211<br />

%- Es liegt ein lineares APS vor, also muss quadratisch gemittelt<br />

%- werden.<br />

aps_lin_mittel_Pa_gesamt = sqrt(sum(aps_lin_Pa_gesamt.^2, 2)/n);<br />

%---------------------------------------------------------------------<br />

%- Bearbeitung des gesamten Frequenzbereiches<br />

%- Die Ergebnisse zum gesamten Frequenzbereich sind durch<br />

%- "_gesamt" gekennzeichnet<br />

%---------------------------------------------------------------------<br />

%- Berechnung des Gesamtpegels des gesamten APS-Bereiches<br />

gp_aps_lin_mittel_Pa_gesamt = sqrt(1/epsilon * ↵<br />

sum(aps_lin_mittel_Pa_gesamt.^2));<br />

%- Schalldruckpegel berechnen, in dB für den gesamten Bereich<br />

aps_lin_mittel_dB_gesamt = 20. * log10(aps_lin_mittel_Pa_gesamt ./ ↵<br />

p_null);<br />

gp_aps_lin_mittel_dB_gesamt = 20. * log10(gp_aps_lin_mittel_Pa_gesamt ./ ↵<br />

p_null);<br />

%----------------------------------------------------------------------<br />

%- A-Bewertung<br />

aps_lin_mittel_dB_A_gesamt = aps_lin_mittel_dB_gesamt + Lp_A_spl_gesamt;<br />

%- Amplituden aus aps_lin_mittel_dB_A_gesamt für gp_ges in dB(A)<br />

amp_A_Pa_gesamt = 10.^(aps_lin_mittel_dB_A_gesamt ./ 20) * p_null;<br />

gp_lin_A_Pa_gesamt = sqrt(1/epsilon * sum(amp_A_Pa_gesamt.^2));<br />

gp_aps_lin_mittel_dB_A_gesamt = 20. * log10(gp_lin_A_Pa_gesamt ./ p_null);<br />

%----------------------------------------------------------------------<br />

%----------------------------------------------------------------------<br />

%- Zeitabhängiger GP<br />

%- Abstand der abgetasteten Punkte<br />

dt = 1/abtastrate;<br />

%- Anzahl der delta_t im Zeitsignal<br />

n_delta_t = (dauer-mod(dauer, delta_t))/delta_t;<br />

disp(['Berechnung von ', num2str(n_delta_t), ' Gesamtpegeln']);<br />

%- Anzahl der dt in delta_t<br />

%- Über dt wird dann delta_t formuliert damit liegt man direkt im<br />

%- Abtastraster<br />

n_dt_delta_t = (delta_t-mod(delta_t, dt))/dt;<br />

%- Formulierung von delta_t durch dt<br />

delta_t_dt = n_dt_delta_t * dt;<br />

for i = 1 : n_delta_t<br />

i_s = (i-1) * n_dt_delta_t + 1;<br />

i_e = i * n_dt_delta_t;<br />

%- Zeitachse<br />

gp_z(i,1) = i * delta_t_dt;<br />

%- Gesamtpegel<br />

gp_z(i,2) = 20.*log10(sqrt(1/n_dt_delta_t * ↵<br />

sum(zeitdaten_Pa(i_s:i_e).^2))/p_null);<br />

end<br />

%-----------------------------------------------------------------------<br />

%-----------------------------------------------------------------------<br />

<strong>Fachhochschule</strong> Düsseldorf Diplomarbeit 2002/03, Terence Klitz

Hurra! Ihre Datei wurde hochgeladen und ist bereit für die Veröffentlichung.

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!