地震工程作业.doc
《地震工程作业.doc》由会员分享,可在线阅读,更多相关《地震工程作业.doc(7页珍藏版)》请在咨信网上搜索。
1、地震工程课程大作业作业1绘制1940 El Centro,N-S分量地震动的绝对加速度、相对速度和相对位移反应谱.地震动:在PEER Ground Motion Database自行下载经典的1940 El Centro,NS分量。 要求:在此模板内完成,A4纸打印。自编程序与软件(Bispec或Seismosigna等)计算反应谱进行对比。提交自编写程序。Matlab程序:clearfid = fopen(E:EarthquakeEl centro。txt);Accelerate,count = fscanf(fid,%g); count 读入的记录的量Accelerate=9.8Accel
2、erate; %单位统一为 m和stime=0:0。02:(count1)*0。02; 单位 sDisplace=zeros(1,count); 相对位移Velocity=zeros(1,count); 相对速度AbsAcce=zeros(1,count); %绝对加速度DampA=0.00,0.02,0。05; %三个阻尼比TA=0。0:0。02:4; TA=0.000001:0.02:4;结构周期Dt=0。02; 地震记录的步长记录计算得到的反应,MDis为某阻尼时最大相对位移MVel为某阻尼时最大相对速度,MAcc某阻尼时最大绝对加速度MDis=zeros(3,length(TA));M
3、Vel=zeros(3,length(TA));MAcc=zeros(3,length(TA));j=1; for Damp=0。00,0。05,0。1 t=1; for T=0。0:0.02:4 Frcy=2*pi/T ; DamFrcy=Frcy*sqrt(1DampDamp); e_t=exp(DampFrcyDt); s=sin(DamFrcyDt); c=cos(DamFrcy*Dt); A=zeros(2,2); A(1,1)=e_t*(sDamp/sqrt(1Damp*Damp)+c); A(1,2)=e_ts/DamFrcy; A(2,1)=-Frcye_ts/sqrt(1Da
4、mpDamp); A(2,2)=e_t(sDamp/sqrt(1-DampDamp)+c); d_f=(2*Damp21)/(Frcy2*Dt); d_3t=Damp/(Frcy3*Dt); B=zeros(2,2); B(1,1)=e_t*((d_f+Damp/Frcy)s/DamFrcy+(2*d_3t+1/Frcy2)c)-2d_3t; B(1,2)=-e_t(d_fs/DamFrcy+2*d_3tc)-1/Frcy2+2*d_3t; B(2,1)=e_t*(d_f+Damp/Frcy)*(cDamp/sqrt(1Damp2)s)(2d_3t+1/Frcy2)*(DamFrcys+Dam
5、p*Frcyc)+1/(Frcy2Dt); B(2,2)=e_t(1/(Frcy2Dt)c+s*Damp/(Frcy*DamFrcy*Dt))-1/(Frcy2*Dt); for i=1:(count-1) Displace(i+1)=A(1,1)*Displace(i)+A(1,2)Velocity(i)+B(1,1)*Accelerate(i)+B(1,2)*Accelerate(i+1); Velocity(i+1)=A(2,1)Displace(i)+A(2,2)*Velocity(i)+B(2,1)Accelerate(i)+B(2,2)*Accelerate(i+1); AbsAc
6、ce(i+1)=-2*Damp*FrcyVelocity(i+1)Frcy2Displace(i+1); end MDis(j,t)=max(abs(Displace)); MVel(j,t)=max(abs(Velocity); if T=0。0 MAcc(j,t)=max(abs(Accelerate);else MAcc(j,t)=max(abs(AbsAcce); end Displace=zeros(1,count); Velocity=zeros(1,count); AbsAcce=zeros(1,count); t=t+1; end j=j+1;endclose allfigur
7、e %绘制位移反应谱plot(TA,MDis(1,:),b,TA,MDis(2,:),-r,TA,MDis(3,:),:k)title(Displacement)xlabel(Tn(s)ylabel(Displacement(m))legend(=0,=0.02,=0。05)gridfigure %绘制速度反应谱plot(TA,MVel(1,:),-b,TA,MVel(2,:),r,TA,MVel(3,:),:k)title(Velocity)xlabel(Tn(s)ylabel(velocity(m/s)legend(=0,=0。02,=0。05)gridfigure 绘制绝对加速度反应谱p
8、lot(TA,MAcc(1,:),b,TA,MAcc(2,:),-r,TA,MAcc(3,:),:k)title(Absolute Acceleration)xlabel(Tn(s))ylabel(absolute acceleration(m/s2))legend(=0,=0.02,=0。05)grid由此得到下图反应谱与由Seismosigna得到的反应谱作出比较相对位移反应谱(上)与Seismosigna计算相对位移反应谱(下)的比较相对速度反应谱(上)与Seismosigna计算相对速度反应谱(下)的比较绝对加速度反应谱(左图)与Seismosigna计算绝对加反应谱(右图)的比较作业
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 地震 工程 作业
1、咨信平台为文档C2C交易模式,即用户上传的文档直接被用户下载,收益归上传人(含作者)所有;本站仅是提供信息存储空间和展示预览,仅对用户上传内容的表现方式做保护处理,对上载内容不做任何修改或编辑。所展示的作品文档包括内容和图片全部来源于网络用户和作者上传投稿,我们不确定上传用户享有完全著作权,根据《信息网络传播权保护条例》,如果侵犯了您的版权、权益或隐私,请联系我们,核实后会尽快下架及时删除,并可随时和客服了解处理情况,尊重保护知识产权我们共同努力。
2、文档的总页数、文档格式和文档大小以系统显示为准(内容中显示的页数不一定正确),网站客服只以系统显示的页数、文件格式、文档大小作为仲裁依据,平台无法对文档的真实性、完整性、权威性、准确性、专业性及其观点立场做任何保证或承诺,下载前须认真查看,确认无误后再购买,务必慎重购买;若有违法违纪将进行移交司法处理,若涉侵权平台将进行基本处罚并下架。
3、本站所有内容均由用户上传,付费前请自行鉴别,如您付费,意味着您已接受本站规则且自行承担风险,本站不进行额外附加服务,虚拟产品一经售出概不退款(未进行购买下载可退充值款),文档一经付费(服务费)、不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
4、如你看到网页展示的文档有www.zixin.com.cn水印,是因预览和防盗链等技术需要对页面进行转换压缩成图而已,我们并不对上传的文档进行任何编辑或修改,文档下载后都不会有水印标识(原文档上传前个别存留的除外),下载后原文更清晰;试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓;PPT和DOC文档可被视为“模板”,允许上传人保留章节、目录结构的情况下删减部份的内容;PDF文档不管是原文档转换或图片扫描而得,本站不作要求视为允许,下载前自行私信或留言给上传者【快乐****生活】。
5、本文档所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用;网站提供的党政主题相关内容(国旗、国徽、党徽--等)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
6、文档遇到问题,请及时私信或留言给本站上传会员【快乐****生活】,需本站解决可联系【 微信客服】、【 QQ客服】,若有其他问题请点击或扫码反馈【 服务填表】;文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“【 版权申诉】”(推荐),意见反馈和侵权处理邮箱:1219186828@qq.com;也可以拔打客服电话:4008-655-100;投诉/维权电话:4009-655-100。