SIXPALS should not have |. (palettes are black to white) FSIXPALS should have |. (Flip or reverse arranges the palettes from white to black.
Linda -----Original Message----- From: [email protected] [mailto:[email protected]] On Behalf Of Linda A Alvord Sent: Wednesday, October 14, 2015 9:36 PM To: [email protected] Subject: Re: [Jprogramming] Can't find the error using tie Thanks Raul and David, I finally got it to work. It creates all permutations of Red, Green and Blue can be ordered. By interchange colums, I can make the six possible 8 color palettes. Coming next is a search for the best choice to use for creating images which indicate where largest to smallest data occurs in the images. load 'viewmat' BIN=:#:i.8 perm=: 13 :'(i.!y)A.i.y' N=:perm 3 RGB=:255*#:i.8 SIXPALS=:|.<"2>|:<"1 N{"2 1 RGB FSIXPALS=:|.SIXPALS erase names <'RGB' 1 (RGB`RBG`GRB`GBR`BRG`BGR)=:FSIXPALS BRG 0 0 0 255 0 0 0 0 255 255 0 255 0 255 0 255 255 0 0 255 255 255 255 255 Here's one of the possible8 palettes. Linda -----Original Message----- From: [email protected] [mailto:[email protected]] On Behalf Of David Lambert Sent: Wednesday, October 14, 2015 9:21 AM To: programming Subject: Re: [Jprogramming] Can't find the error using tie names 0 3 FSIXPALS N RGB SIXPALS perm N`RGB 0 1 2 0 2 1 1 0 2 1 2 0 2 0 1 2 1 0 0 0 0 0 0 255 0 255 0 0 255 255 255 0 0 255 0 255 255 255 0 255 255 255 RGB`NO_SUCH_NAME |domain error | RGB`NO_SUCH_NAME A_NOUN =: 0 A_NOUN`a_verb |domain error | A_NOUN`a_verb >Date: Wed, 14 Oct 2015 06:36:46 -0400 >From: "Linda A Alvord" < <mailto:[email protected]> [email protected]> >To: < <mailto:[email protected]> [email protected]> >Subject: [Jprogramming] Can't find the error using tie >Message-ID: <000f01d1066c$3a231f70$ae695e50$@net> >Content-Type: text/plain; charset="koi8-r" > > perm=: 13 :'(i.!y)A.i.y' > N=:perm 3 > NAME=:(perm 3){'RGB' > RGB=:255*#:i.8 > SIXPALS=:<"2>|:<"1 N{"2 1 RGB > FSIXPALS=:<"2><|."2>|:<"1 N{"2 1 RGB > erase names '(','(,NAME,',')',')' >0 0 0 1 0 0 0 > (RGB`RBG`GRB`GBR`BRG`BGR) >|domain error: scriptd >| ( RGB`RBG`GRB`GBR`BRG`BGR) >|[-9] c:\users\user\j804-user\temp\34.ijs ---------------------------------------------------------------------- For information about J forums see <http://www.jsoftware.com/forums.htm> http://www.jsoftware.com/forums.htm ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
