Newmark-beta法解微分方程的MATLAB程序

Newmark-beta法解微分方程的MATLAB程序。function[q,v,a]=newmark(M,C,K,F,q0,v0,dt,nt)%newmark-betamethod%[q,v,a]=newmark(M,C,K,F,q0,v0,dt,nt)%obtaintheresponseofthedynamicsystem%M-massmatrix%K-stiffnessmatrix%C-dampingmatrix%F-loadsmatrix(ntcolumns)%