9.3 KiB
9.3 KiB
Test Bench APA95ML
- Introduction
- Setup
- Run Experiment and Save Data
- Huddle Test
- Transfer Function Estimation with $m=5kg$
Introduction ignore
Setup
Parameters
Ts = 1e-4;
Filter White Noise
Glpf = 1/(1 + s/2/pi/500);
Gz = c2d(Glpf, Ts, 'tustin');
Run Experiment and Save Data
Load Data
data = SimulinkRealTime.utils.getFileScopeData('data/apa95ml.dat').data;
Save Data
u = data(:, 1); % Input Voltage [V]
y = data(:, 2); % Output Displacement [m]
t = data(:, 3); % Time [s]
save('./mat/huddle_test.mat', 't', 'u', 'y', 'Glpf');
Huddle Test
Time Domain Data
PSD of Measurement Noise
Ts = t(end)/(length(t)-1);
Fs = 1/Ts;
win = hanning(ceil(1*Fs));
[pxx, f] = pwelch(y, win, [], [], Fs);
Transfer Function Estimation with $m=5kg$
Time Domain Data
Comparison of the PSD with Huddle Test
Ts = t(end)/(length(t)-1);
Fs = 1/Ts;
win = hanning(ceil(1*Fs));
[pxx, f] = pwelch(y, win, [], [], Fs);
[pht, ~] = pwelch(ht.y, win, [], [], Fs);
Compute TF estimate and Coherence
win = hann(ceil(1/Ts));
[tf_est, f] = tfestimate(u, -y, win, [], [], 1/Ts);
[co_est, ~] = mscohere( u, -y, win, [], [], 1/Ts);
Comparison with the FEM model
load('mat/fem_model_5kg.mat', 'Ghm');