46854_it-IT

liliconcom

Come fare l'arrotondamento dei banchieri in JMP

Mi è stato chiesto di recente l'arrotondamento del banchiere e non ho trovato nulla nella documentazione di JMP. Ho scritto la funzione rapida di seguito (oltre a un'opzione di formula), ma ero curioso di sapere se 1) JMP ha un metodo in scatola per fare l'arrotondamento del banco e 2) quali altri / metodi migliori potrebbero essere utili contro il mio. http://wiki.c2.com/?BankersRounding 

bankerRound = Function( {inputValue},
 {inputValue, fDiff, cDiff, modX, bankRound},
 fDiff = inputValue - Floor( inputValue );
 cDiff = Ceiling( inputValue ) - inputValue;
 modX = Modulo( Round( inputValue, 0 ), 2 );
 If(
  cDiff == fDiff & modX == 0, bankRound = Ceiling( inputValue ),
  cDiff == fDiff & modX != 0, bankRound = Floor( inputValue ),
  bankRound = Round( inputValue, 0 )
 );
 Return( bankRound );
);
inputValue = Empty(); // put column name here 
fDiff = inputValue - Floor( inputValue );
cDiff = Ceiling( inputValue ) - inputValue;
modX = Modulo( Round( inputValue, 0 ), 2 );
If(
 cDiff == fDiff & modX == 0, bankRound = Ceiling( inputValue ),
 cDiff == fDiff & modX != 0, bankRound = Floor( inputValue ),
 bankRound = Round( inputValue, 0 )
);

Ri: Come fare Bankers Rounding in JMPSembra una soluzione più pulita. Peccato che JMP non abbia questa funzione di arrotondamento in scatola. Per essere onesti, non avevo idea che ci fossero altri tipi di arrotondamenti che ... standard? arrotondamento

Grazie!Ri: Come fare Bankers Rounding in JMP

Non è costruito ma io pensare questo fa la stessa cosa:

 

bankerRound = Function( {inputValue},
 if( mod(inputValue, 0.5) == 0 & ! mod(inputValue, 1) == 0,
  round(inputValue / 2) * 2,
  round(inputValue)
 )
);

tests = { 0,0.499,0.5,0.501,1,1.499,1.5,1.501,2,2.499,
 2.5,2.501,3,3.499,3.5,3.501,-0.499,-0.5,-0.501,
 -1,-1.499,-1.5,-1.501,-2,-3};

for( i = 1, i <= N items( tests ), i++,
 Write( char( tests[i] ) || " -> " || 
  char( bankerRound( tests[i] ) ) || "\!N" );
);

Ri: Come fare Bankers Rounding in JMP

Ok, sembrava orribile .... proviamo questo per le due opzioni di formula:

 

 

bankerRound = Function({inputValue},
    {inputValue,fDiff,cDiff,modX,bankRound},
    fDiff = inputValue - floor(inputValue);
    cDiff = ceiling(inputValue) - inputValue;
    modX = Modulo(round(inputValue,0),2);
    if(cDiff == fDiff & modX == 0,
        bankRound = Ceiling(inputValue)
    ,
        cDiff == fDiff & modX != 0,
        bankRound = Floor(inputValue);
    ,
        bankRound = Round(inputValue,0);
    );
    Return(bankRound)
);
 
inputValue = Empty(); // place column name here
fDiff = inputValue - floor(inputValue);
cDiff = ceiling(inputValue) - inputValue;
modX = Modulo(round(inputValue,0),2);
if(cDiff == fDiff & modX == 0,
    bankRound = Ceiling(inputValue)
,
    cDiff == fDiff & modX != 0,
    bankRound = Floor(inputValue);
,
    bankRound = Round(inputValue,0);
);