Price fraction: Difference between revisions
Content added Content deleted
(Pari/GP) |
|||
| Line 1,159: | Line 1,159: | ||
values <- dfr$V6 |
values <- dfr$V6 |
||
</lang> |
</lang> |
||
=={{header|REXX}}== |
|||
<lang rexx> |
|||
/*REXX program to rescale a price (0.99 --> 1.00). */ |
|||
do j=0 to 1 by .01 |
|||
if j=0 then j=0.00 |
|||
say 'original price-->'j " " adjustPrice(j) '<-- adjusted price' |
|||
end |
|||
exit |
|||
adjustPrice: procedure; parse arg x |
|||
select |
|||
when x<0.06 then x=0.10 |
|||
when x<0.11 then x=0.18 |
|||
when x<0.16 then x=0.26 |
|||
when x<0.21 then x=0.32 |
|||
when x<0.26 then x=0.38 |
|||
when x<0.31 then x=0.44 |
|||
when x<0.36 then x=0.50 |
|||
when x<0.41 then x=0.54 |
|||
when x<0.46 then x=0.58 |
|||
when x<0.51 then x=0.62 |
|||
when x<0.56 then x=0.66 |
|||
when x<0.61 then x=0.70 |
|||
when x<0.66 then x=0.74 |
|||
when x<0.71 then x=0.78 |
|||
when x<0.76 then x=0.82 |
|||
when x<0.81 then x=0.86 |
|||
when x<0.86 then x=0.90 |
|||
when x<0.91 then x=0.94 |
|||
when x<0.96 then x=0.98 |
|||
when x<1.01 then x=1.00 |
|||
otherwise nop |
|||
end |
|||
return x |
|||
</lang> |
|||
Output: |
|||
<pre style="height:30ex;overflow:scroll"> |
|||
original price-->0.00 0.10 <-- adjusted price |
|||
original price-->0.01 0.10 <-- adjusted price |
|||
original price-->0.02 0.10 <-- adjusted price |
|||
original price-->0.03 0.10 <-- adjusted price |
|||
original price-->0.04 0.10 <-- adjusted price |
|||
original price-->0.05 0.10 <-- adjusted price |
|||
original price-->0.06 0.18 <-- adjusted price |
|||
original price-->0.07 0.18 <-- adjusted price |
|||
original price-->0.08 0.18 <-- adjusted price |
|||
original price-->0.09 0.18 <-- adjusted price |
|||
original price-->0.10 0.18 <-- adjusted price |
|||
original price-->0.11 0.26 <-- adjusted price |
|||
original price-->0.12 0.26 <-- adjusted price |
|||
original price-->0.13 0.26 <-- adjusted price |
|||
original price-->0.14 0.26 <-- adjusted price |
|||
original price-->0.15 0.26 <-- adjusted price |
|||
original price-->0.16 0.32 <-- adjusted price |
|||
original price-->0.17 0.32 <-- adjusted price |
|||
original price-->0.18 0.32 <-- adjusted price |
|||
original price-->0.19 0.32 <-- adjusted price |
|||
original price-->0.20 0.32 <-- adjusted price |
|||
original price-->0.21 0.38 <-- adjusted price |
|||
original price-->0.22 0.38 <-- adjusted price |
|||
original price-->0.23 0.38 <-- adjusted price |
|||
original price-->0.24 0.38 <-- adjusted price |
|||
original price-->0.25 0.38 <-- adjusted price |
|||
original price-->0.26 0.44 <-- adjusted price |
|||
original price-->0.27 0.44 <-- adjusted price |
|||
original price-->0.28 0.44 <-- adjusted price |
|||
original price-->0.29 0.44 <-- adjusted price |
|||
original price-->0.30 0.44 <-- adjusted price |
|||
original price-->0.31 0.50 <-- adjusted price |
|||
original price-->0.32 0.50 <-- adjusted price |
|||
original price-->0.33 0.50 <-- adjusted price |
|||
original price-->0.34 0.50 <-- adjusted price |
|||
original price-->0.35 0.50 <-- adjusted price |
|||
original price-->0.36 0.54 <-- adjusted price |
|||
original price-->0.37 0.54 <-- adjusted price |
|||
original price-->0.38 0.54 <-- adjusted price |
|||
original price-->0.39 0.54 <-- adjusted price |
|||
original price-->0.40 0.54 <-- adjusted price |
|||
original price-->0.41 0.58 <-- adjusted price |
|||
original price-->0.42 0.58 <-- adjusted price |
|||
original price-->0.43 0.58 <-- adjusted price |
|||
original price-->0.44 0.58 <-- adjusted price |
|||
original price-->0.45 0.58 <-- adjusted price |
|||
original price-->0.46 0.62 <-- adjusted price |
|||
original price-->0.47 0.62 <-- adjusted price |
|||
original price-->0.48 0.62 <-- adjusted price |
|||
original price-->0.49 0.62 <-- adjusted price |
|||
original price-->0.50 0.62 <-- adjusted price |
|||
original price-->0.51 0.66 <-- adjusted price |
|||
original price-->0.52 0.66 <-- adjusted price |
|||
original price-->0.53 0.66 <-- adjusted price |
|||
original price-->0.54 0.66 <-- adjusted price |
|||
original price-->0.55 0.66 <-- adjusted price |
|||
original price-->0.56 0.70 <-- adjusted price |
|||
original price-->0.57 0.70 <-- adjusted price |
|||
original price-->0.58 0.70 <-- adjusted price |
|||
original price-->0.59 0.70 <-- adjusted price |
|||
original price-->0.60 0.70 <-- adjusted price |
|||
original price-->0.61 0.74 <-- adjusted price |
|||
original price-->0.62 0.74 <-- adjusted price |
|||
original price-->0.63 0.74 <-- adjusted price |
|||
original price-->0.64 0.74 <-- adjusted price |
|||
original price-->0.65 0.74 <-- adjusted price |
|||
original price-->0.66 0.78 <-- adjusted price |
|||
original price-->0.67 0.78 <-- adjusted price |
|||
original price-->0.68 0.78 <-- adjusted price |
|||
original price-->0.69 0.78 <-- adjusted price |
|||
original price-->0.70 0.78 <-- adjusted price |
|||
original price-->0.71 0.82 <-- adjusted price |
|||
original price-->0.72 0.82 <-- adjusted price |
|||
original price-->0.73 0.82 <-- adjusted price |
|||
original price-->0.74 0.82 <-- adjusted price |
|||
original price-->0.75 0.82 <-- adjusted price |
|||
original price-->0.76 0.86 <-- adjusted price |
|||
original price-->0.77 0.86 <-- adjusted price |
|||
original price-->0.78 0.86 <-- adjusted price |
|||
original price-->0.79 0.86 <-- adjusted price |
|||
original price-->0.80 0.86 <-- adjusted price |
|||
original price-->0.81 0.90 <-- adjusted price |
|||
original price-->0.82 0.90 <-- adjusted price |
|||
original price-->0.83 0.90 <-- adjusted price |
|||
original price-->0.84 0.90 <-- adjusted price |
|||
original price-->0.85 0.90 <-- adjusted price |
|||
original price-->0.86 0.94 <-- adjusted price |
|||
original price-->0.87 0.94 <-- adjusted price |
|||
original price-->0.88 0.94 <-- adjusted price |
|||
original price-->0.89 0.94 <-- adjusted price |
|||
original price-->0.90 0.94 <-- adjusted price |
|||
original price-->0.91 0.98 <-- adjusted price |
|||
original price-->0.92 0.98 <-- adjusted price |
|||
original price-->0.93 0.98 <-- adjusted price |
|||
original price-->0.94 0.98 <-- adjusted price |
|||
original price-->0.95 0.98 <-- adjusted price |
|||
original price-->0.96 1.00 <-- adjusted price |
|||
original price-->0.97 1.00 <-- adjusted price |
|||
original price-->0.98 1.00 <-- adjusted price |
|||
original price-->0.99 1.00 <-- adjusted price |
|||
original price-->1.00 1.00 <-- adjusted price |
|||
</pre> |
|||
=={{header|Ruby}}== |
=={{header|Ruby}}== |
||