比较恒定的延性反应谱的RSN1044μ= 2

内容

输入

地震运动

GMFileLoc =“输入\”;

一个文本文件包含通用名称的列表

RecordList = [“输入\ Record_List.txt”];

从specifid读取E.Q.记录名称列表

fid = fopen (RecordList,“r”);记录= textscan (fid,' % s ');% * 1 = num的记录长度,细胞文件关闭(fid);

从specifid读取E.Q.记录名称列表返回变量包括记录名称,dt, num的点,PGA, Acc TH,光谱Acc accelration-related变量(PGA、Sa、Acc TH)是g的单位;disp-related m如果不指定扩展因素在这一步中,默认值为每个通用= 1

[RecordName_all, dt, numPoint_all、PGA_all xgtt] =fn_ParseAT2File2 (GMFileLoc、记录);

设置本征周期响应光谱计算范围。

Tspectra = (0.05:0.05:4) ';

设定的临界阻尼比反应谱计算。

ksi = 0.02;

结果OpenSeismoMatlab

设置目标延性

μ= 2;%μ= 1等价于一个线性应用

提取光谱常数延性反应

sw =“cd”;

计算cdr{我}= [S.Period、S.CDSd S.CDSv, S.CDPSa, S.fyK, S.muK, S.iterK);

S1 = OpenSeismoMatlab (dt, xgtt{1},西南,[],[],ksi, Tspectra,μ);

结果SeismoSignal

文件标识= fopen (“输入/ RSN1044_Damping2.txt”);idx = 1:5 fgetl(文件标识);结束C = textscan(文件标识,repmat (' % f '1、15));文件关闭(文件标识);

输出

情节谱加速度反应谱

图()图(S1.Period S1.CDSa / 9.8,“k”,“线宽”1);持有%的阴谋(S2.Period S2.Sa,“r”,“线宽”,1);情节(C C{1},{3})传说(“光盘,μ= 2”,“SeismoSignal”);包含(“时间”);ylabel (“光谱Acc”。)举行

情节谱速度反应谱

图()图(S1.Period S1.CDSv,“k”,“线宽”1);持有%的阴谋(S2.Period S2.Sa,“r”,“线宽”,1);情节(C C{1},{7} / 100)传说(“光盘,μ= 2”,“SeismoSignal”);包含(“时间”);ylabel (光谱韦尔。)举行

情节光谱位移响应谱

图()图(S1.Period S1.CDSd,“k”,“线宽”1);持有%的阴谋(S2.Period S2.Sa,“r”,“线宽”,1);情节(C C{1},{11} / 100)传说(“光盘,μ= 2”,“SeismoSignal”);包含(“时间”);ylabel (“光谱Disp”。)举行

每个本征周期的实现延性。它应该等于或接近目标延性μ= 2

图()图(S1.Period S1.muK,“k”,“线宽”1);包含(“时间”);ylabel (真正的μ值迭代后的)