I decided to try to fit polynomial least squares to the graphs. Below shows
my approach. My approximations of reading the graphs are very crude, but
probably adequate.
I must say that red seems to be missing in the color map shown in the
viewmat, and I am not sure I like this palette for the addition table,
relative to the greyscale palette.
NB. parulareg.ijs
pol=: +/@([*]^i.@#@[)"1 0 NB. help/dictionary/intro14.htm
lsfit=: {:@] %. {.@] ^/ i.@>:@[ NB. addons/stats/base/multivariate.ijs
green =: 0 18 50 46 100 66 160 75 207 71 255 100
plot (i. 256) pol~4 lsfit |:_2*&1 2.55\green
G =: (i. 256) pol~4 lsfit |:_2*&1 2.55\green
blue =: 0 53 30 89 50 86 100 77 150 51 200 31 250 9
plot (i. 256) pol~4 lsfit |:_2*&1 2.55\blue
B =: (i. 256) pol~4 lsfit |:_2*&1 2.55\blue
red =: 0 21 20 19 36 0 50 4 60 10 100 1 150 42 200 89 220 100 250 97
plot (i. 256) pol~6 lsfit |:_2*&1 2.55\red
R =: (i. 256) pol~6 lsfit |:_2*&1 2.55\red
parula =: R,.G,.B
parula viewmat +/~i. 13
parula viewmat i. 256
--
(B=)
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
