UnderDamped Free SDOF System
Ältere Kommentare anzeigen
%%%%%%%%%%%%%%%% Equation of Motion: Damped SDOF System %%%%%%%%%%%%%%%%%%%
%%%%%% Example Problem - 2.5 (Dynamics of Structures - Ashok K.Jain) %%%%%%
clc;
clear all;
close all;
%% INPUTs:
m = 5*10^3; % Lumped Mass (kg)
k = 10^5; % Stiffness (N/m)
c = 0.05; % Damping Coefficient
x0 = 0.02; % Initial Displacement (in m)
v0 = 0.05; % Initial Velocity (in m/s)
%% OUTPUTs:
z = c/m;
wn = sqrt(k/m) % Natural Circular Frequency (rad/s)
f = wn/(2*pi()) % Natural Cyclic Frequency (Hertz-Hz)
T = 1/f % Fundamental Time-Period (sec)
Z = c/(2*m*wn) % Damping Ratio
wd = wn*(sqrt(1-Z^2)) % Damped Frequency
A = sqrt((x0^2) + (v0/wn)^2) % Amplitude (m)
vm = A*wn % Maximum Velocity (m/s)
am = vm*wn % Maximum Acceleration (m/s/s)
Phi = atand(x0*wn/v0) % Phase Angle (in degree)
p = [1 z wn^2];
roots(p)
syms X(t)
E = diff(X,t,2) + diff(X,t)*z + (wn^2)*X == 0;
x = dsolve(vpa(E)) % C1 & C2 are constant and can be determined by BCs
dX = diff(X,t);
conds =[X(0)==x0,dX(0)==v0];
x = dsolve(vpa(E),conds)
xD = rad2deg(x)
%% Plots:
fplot(xD,[0 5],'k','LineWidth',1.25);
xlabel('displacment (in m)');
ylabel('time (t)');
title('Displacement Response Curve');
Problem-1: The graph obtained through this code is looks similar to undamped system, while this is a code of undamped system and has to degrad with each cycle?
Akzeptierte Antwort
Weitere Antworten (0)
Kategorien
Mehr zu Vibration Analysis finden Sie in Hilfe-Center und File Exchange
Community Treasure Hunt
Find the treasures in MATLAB Central and discover how the community can help you!
Start Hunting!

