随机载荷模拟及雨流计数方法在matlab中的实现

近日来的工作

一、仿真随机过程

sw=2;

A=sqrt(2*sw*detaw)

（1）中心频率为10pi，detaw=0.01，带宽为2pi的低频窄带随机过程for n=9:0.01:11;

xn=A*sin(n*pi*t+rand(1,1)*2*pi);

x=x+xn;

end

（2）中心频率为100pi，detaw=0.01，带宽为2pi的高频窄带随机过程for n=99:0.01:101;

yn=A*sin(n*pi*t+rand(1,1)*2*pi);

y=y+yn;

end

（3）低频与高频组合成的宽带随机过程

二、用雨流计数法截取循环

（1）得到随机过程x的极点值（储存在矩阵S中）。

n=length(x);

s=x(1);

for i=2:n-1;

if (x(i)>x(i-1))&&(x(i)>x(i+1))||((x(i)

end

end

S=[s,x(n)];

（2）对极值点间变程进行比较分析，截取循环

while i+3

i=i+1;

detaS1=abs(S(i+1)-S(i)); %获得四个极值点间的三段变程

detaS2=abs(S(i+2)-S(i+1));

detaS3=abs(S(i+3)-S(i+2));

if (detaS2<=detaS1)&&(detaS2<=detaS3) %将变程满足截取条件的循环截取出 Ba=[Ba,(S(i+2)-S(i+1))/2]; %截取出循环的幅值

Bm=[Bm,(S(i+2)+S(i+1))/2]; %截取出循环的均值

Q=[Q;S(i+1),S(i+2)]; %构成截取出循环的极值点存于Q中，即原随机过程抛弃的点

S(i+1)=[];

S(i+2)=[];

i=i-1;

end

end

Sr=S; %剩余的极值点存于Sr中

（3）分别对低频窄带、高频窄带、宽带进行雨流处理

低频窄带

高频窄带

宽带

问题二：由于观察到用雨流法处理这三种随机过程的效果差别比较大，就编程统计计算了雨流处理这三种随机过程抛弃的极值点数（即截取的循环）与原载荷极值点数之比rate。因为我理解为rate越大，雨流处理效果越好（不知道对不对？）得到的统计结果如下：

首先，每种随机过程都对一个信号雨流处理的结果比较

其次，每种随机过程都对很多个信号雨流处理的统计结果（对100组信号进行统计）:

rate

低频窄带随机过程0.0814

频窄带随机过程0.3006

组合宽带随机过程0.3178

这样看的话这种雨流计数法对这三种随机过程的适用性：宽带>高频窄带>低频窄带（自己这么想的，不知是否行的通）

三、对剩余载荷的处理

re=[ZSr,ZSr];

[reside,Ba,Bm,Q]=Rainflow(re);

四、载荷的重构（将循环插入剩余载荷中）

（1）筛选出要插入循环Q中高于门槛值threshold的循环存于S中

[c,r]=size(Q);

S=[];

Abs=[];

for i=1:c

if abs(Q(i,2)-Q(i,1))>threshold

S=[S;Q(i,1),Q(i,2)];

Abs=[Abs,abs(Q(i,2)-Q(i,1))];

end

end

（2）对S中循环按幅值大小降序排列

[Abs,index]=sort(Abs);

index=fliplr(index);

k1=S(:,1);S(:,1)=k1(index);

k2=S(:,2);S(:,2)=k2(index);

（3）按幅值由大到小插入载荷序列中（这部分编出来程序运行没有问题，但结果显示似乎并没有插进去，还在寻找问题中…）

[c,r]=size(S);

no1=[];no2=[];

while m<=c

if S(m,1)

n=length(reside);

rde=[];indexrde=[];

for i=1:n-1

if(reside(i)>=S(m,2))&&(reside(i+1)<=S(m,1)) %筛选出第m

个循环能够插入的序列

rde=[rde;reside(i),reside(i+1)];

indexrde=[indexrde;i,i+1];

end

end

[k,g]=size(rde);

if k==0

m=m+1;

else

chu=randi(k,1,1); %在所有能够插入的序列中随机选取一个插入

p=indexrde(chu,1);

reside=[reside(1:p),S(m,1),S(m,2),reside(p+1:length(reside))]; m=m+1;

end

else

n=length(reside);

rin=[];indexrin=[];

for i=1:n-1

if (reside(i)<=S(m,2))&&(reside(i+1)>=S(m,1))

rin=[rin;reside(i),reside(i+1)];

indexrin=[indexrin;i,i+1];

end

end

[k,g]=size(rin);

if k==0

m=m+1;

else

chu=randi(k,1,1);

p=indexrin(chu,1);

reside=[reside(1:p),S(m,1),S(m,2),reside(p+1:length(reside))]; m=m+1;

end

end

end

问题四：这种以逆雨流法重构载荷的意义就在于去除一些不必要的载荷吗？