1. 2+47.d00 ) ) ) 614: f3=dsin( dsqrt( dabs( x(i)-(x(I+1)+47.d00) ) )) 615: f4=-x(i) 616: f=f+ f1*f2+f3*f4 617: enddo 618: do I=1,m 619: if(dabs(x(i)).gt.512.d00) fp=fp+x(i)**2 620: enddo 621: if(fp.gt.0.d00) f=fp 622: return;IF(KF.EQ.25) THEN 608: C EGG HOLDER FUNCTION 609: f=0.d00 610: fp=0.d00 611: do I=1,m-1 612: f1=-(x(I+1)+47.d00) 613: f2=dsin( dsqrt( dabs( x(I+1)+x(i)
2. Figure S9: 100 taxa FN-rate (A) and FP-rate (B) for single and combined scorings
3. PARAMETER(N=13,K=3) 718: IMPLICIT DOUBLE PRECISION (A-H, O-Z) 719: DIMENSION X(N,K);M;IF(KF.EQ.30) THEN 694: C Quartic function with noise 695: f=0.d00 696: FP=0.D00 697: DO I=1,M 698: IF(DABS(X(I)).GT.4.28D00) FP=FP+DEXP(DABS