22 lines
400 B
Plaintext
22 lines
400 B
Plaintext
{def maprange
|
|
{lambda {:a0 :a1 :b0 :b1 :s}
|
|
{+ :b0 {/ {* {- :s :a0} {- :b1 :b0}} {- :a1 :a0}}}}}
|
|
-> maprange
|
|
|
|
{maprange 0 10 -1 0 5}
|
|
-> -0.5
|
|
|
|
{S.map {maprange 0 10 -1 0} {S.serie 0 10}}
|
|
->
|
|
0 maps to -1
|
|
1 maps to -0.9
|
|
2 maps to -0.8
|
|
3 maps to -0.7
|
|
4 maps to -0.6
|
|
5 maps to -0.5
|
|
6 maps to -0.4
|
|
7 maps to -0.30000000000000004
|
|
8 maps to -0.19999999999999996
|
|
9 maps to -0.09999999999999998
|
|
10 maps to 0
|