Difference between revisions of "EGR 224/Active Filter"

From PrattWiki
Jump to navigation Jump to search
Line 1: Line 1:
The following page provides some supplemental information for the '''Active Filters ''' lab for [[EGR 224|EGR 224L]].  It has been updated to Spring, 2016.
+
The following page provides some supplemental information for the '''Active Filters ''' lab for [[EGR 224|EGR 224L]].  It has been updated to Spring, 2017.
  
 
== Script from 7.4.2 ==
 
== Script from 7.4.2 ==

Revision as of 21:23, 10 April 2017

The following page provides some supplemental information for the Active Filters lab for EGR 224L. It has been updated to Spring, 2017.

Script from 7.4.2

clear
load DukeFightSong
%% Filter constants
R = 10000;   C = 50e-9;

%% Experimental Transfer Function
[EstH, EstF] = tfestimate(SoundIn, SoundOut, [], [], [], samplerate);
EstMag = abs(EstH);
EstOmega = EstF*2*pi;
%% Analytical Transfer Function
s = tf([1 0], [1]);
H = 1 / (1 + s * R * C);
[HMag, HPhase, HOmega] = bode(H, {1, max(EstOmega)});
HMag = squeeze(HMag);
%% Make plot
figure(1); clf
semilogx(EstOmega, 20*log10(EstMag), 'b-')
hold on
semilogx(HOmega, 20*log10(HMag), 'r-')
hold off
xlabel('\omega, rad/s'); ylabel('|H|, dB')
legend('Estimates', 'Theoretical', 0)