bug fixed for GRU and GRT in SHAPE_ver2b.0
This commit is contained in:
		@@ -1,3 +1,6 @@
 | 
				
			|||||||
 | 
					>>>> 23 JULY 2020
 | 
				
			||||||
 | 
					Bug fixed for confidence interval estimation in SHAPE_ver2b.0
 | 
				
			||||||
 | 
					
 | 
				
			||||||
>>>> 08 JUNE 2020
 | 
					>>>> 08 JUNE 2020
 | 
				
			||||||
Please find the new version SHAPE_ver2b, which in addition to all functionalities included in SHAPE_ver2
 | 
					Please find the new version SHAPE_ver2b, which in addition to all functionalities included in SHAPE_ver2
 | 
				
			||||||
also estimates the 95% bootstrap confidence interval of Mean Return Period, Exceedance Probability, and 
 | 
					also estimates the 95% bootstrap confidence interval of Mean Return Period, Exceedance Probability, and 
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -107,7 +107,7 @@ clear x;
 | 
				
			|||||||
beta=1/(mean(xx)-Mmin+eps/2);
 | 
					beta=1/(mean(xx)-Mmin+eps/2);
 | 
				
			||||||
b=beta/log(10);
 | 
					b=beta/log(10);
 | 
				
			||||||
% Add bootstrap CI of b-value                        %K03JUN2020
 | 
					% Add bootstrap CI of b-value                        %K03JUN2020
 | 
				
			||||||
b_aki=@(xx)1/(log(10)*(mean(xx)-min(xx)+eps/2));     %K03JUN2020    
 | 
					b_aki=@(xx)1/(log(10)*(mean(xx)-Mmin+eps/2));     %K03JUN2020    
 | 
				
			||||||
bCI=bootci(Nbst,{b_aki,xx},'alpha',0.05);            %K03JUN2020
 | 
					bCI=bootci(Nbst,{b_aki,xx},'alpha',0.05);            %K03JUN2020
 | 
				
			||||||
clear xx
 | 
					clear xx
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -61,8 +61,13 @@ PDF_GRT(idx)=zeros(size(idx));CDF_GRT(idx)=zeros(size(idx));
 | 
				
			|||||||
idx=find(CDF_GRT>1);
 | 
					idx=find(CDF_GRT>1);
 | 
				
			||||||
PDF_GRT(idx)=zeros(size(idx));CDF_GRT(idx)=ones(size(idx));
 | 
					PDF_GRT(idx)=zeros(size(idx));CDF_GRT(idx)=ones(size(idx));
 | 
				
			||||||
 | 
					
 | 
				
			||||||
CDF_low=1-exp(-beta_low*(m-Mmin+eps/2));
 | 
					mian_low=(1-exp(-beta_low*(Mmax-Mmin+eps/2)));mian_high=(1-exp(-beta_high*(Mmax-Mmin+eps/2)));
 | 
				
			||||||
CDF_high=1-exp(-beta_high*(m-Mmin+eps/2));
 | 
					CDF_low=(1-exp(-beta_low*(m-Mmin+eps/2)))/mian_low;
 | 
				
			||||||
 | 
					idx=find(CDF_low<0);CDF_low(idx)=zeros(size(idx));
 | 
				
			||||||
 | 
					idx=find(CDF_low>1);CDF_low(idx)=ones(size(idx));
 | 
				
			||||||
 | 
					CDF_high=(1-exp(-beta_high*(m-Mmin+eps/2)))/mian_high;
 | 
				
			||||||
 | 
					idx=find(CDF_high<0);CDF_high(idx)=zeros(size(idx));
 | 
				
			||||||
 | 
					idx=find(CDF_high>1);CDF_high(idx)=ones(size(idx));
 | 
				
			||||||
 | 
					
 | 
				
			||||||
CDF_GRT=[CDF_GRT CDF_low CDF_high];
 | 
					CDF_GRT=[CDF_GRT CDF_low CDF_high];
 | 
				
			||||||
end
 | 
					end
 | 
				
			||||||
 
 | 
				
			|||||||
		Reference in New Issue
	
	Block a user