【Percentile_a】

1. Inputs: PcntileArray[size](NumericArrayRef), VArraySize(Numeric), Pcntile(Numeric);
   
2. Variables: var0(0), var1(0), var2(0), var3(0), var4(0), var5(0);
   
3.                                                                                                      
   
4. condition1 = MinList(size, VArraySize) > 1 ;
   
5. If condition1 Then Begin
   
6.         var0 = SortUp_a(PcntileArray, VArraySize);
   
7.         var1 = 1 / (VArraySize - 1);
   
8.         var2 = IntPortion(Pcntile / var1) + 1;
   
9.         var3 = MinList(var2 + 1, VArraySize);
   
10.         var4 = (Pcntile - ((var2 - 1) * var1)) / var1;
    
11.         var5 = PcntileArray[var2] + (var4 * (PcntileArray[var3] - PcntileArray[var2]));
    
12. 
    
13.         Percentile_a = var5;
    
14. End
    
15. Else
    
16.         Percentile_a = -1;

复制代码