Try improve the formula of color addition to something like
> RIGHT=:R=:25 3$,P=: 255<.(8 7 6 5 4{CYAN)+"1/(8 7 6 5 4){MAGENTA
or
> RIGHT=:R=:25 3$,P=: 255<. <. %&2 (8 7 6 5 4{CYAN)+"1/(8 7 6 5 4){MAGENTA
anyways it needs to clamp at 255 otherwise RED + RED would
become DOUBLE RED.
That said, "Corret" depends on your interpretation.
Ср, 24 июн 2015, Linda Alvord написал(а):
> How do you explain that RIGHT works correctly? Look at the palette, RIGHT.
>
> load 'viewmat'
> N=:<.63.8*i.5
> BLUE=:(2#"1,.(4#0),N),.N,4#255
> MAGENTA=:2 0 2{"1 BLUE
> CYAN=:0 2 2{"1 BLUE
> RIGHT=:R=:25 3$,P=:(8 7 6 5 4{CYAN)+"1/(8 7 6 5 4){MAGENTA
> RIGHT
> 510 510 510
> 510 446 510
> 510 382 510
> 510 318 510
> 510 255 510
> 446 510 510
> 446 446 510
> 446 382 510
> 446 318 510
> 446 255 510
> 382 510 510
> 382 446 510
> 382 382 510
> 382 318 510
> 382 255 510
> 318 510 510
> 318 446 510
> 318 382 510
> 318 318 510
> 318 255 510
> 255 510 510
> 255 446 510
> 255 382 510
> 255 318 510
> 255 255 510
>
> This image works with "improper" colors.
>
> RIGHT viewmat A=:i.5 5
>
> Linda
>
>
> -----Original Message-----
> From: [email protected]
> [mailto:[email protected]] On Behalf Of Raul Miller
> Sent: Wednesday, June 24, 2015 2:18 AM
> To: Programming forum
> Subject: Re: [Jprogramming] Trouble making patter for a color cube
>
> A color, for viewmat, the way you are using it, is a sequence of three
> integers in the range 0 .. 255.
>
> The problem is that none of the sequences in FRONT nor BASE are valid
> colors.
>
> This problem is made more confusing because while BLACK and WHITE are single
> valued "colors", the others range from black to white with the named color
> appearing in the middle. And then you're using just parts of those
> sequences. The grammar may be "simple" but the abstractions are not.
>
> So... there are several problems to fix here, but the biggest problem is
> that your results are not valid colors. If I subtract 255 from each of the
> values you have there, they are better, but still not correct.
>
> Anyways, if I look at the adjacent squares, FRONT should have:
>
> at index 0 (upper left corner): 255 0 0 at index 4 (upper right corner):
> 255 0 255 at index 20 (lower left corner): 255 255 0 at index 24 (lower
> right corner): 255 255 255
>
> Similarly, BASE should have:
>
> at index 0: 255 255 0
> at index 4: 255 255 255
> at index 20: 0 255 0
> at index 24: 0 255 255
>
> Instead, you have this:
>
> 0 4 20 24{ FRONT -255
> 255 255 255
> 255 0 255
> 255 255 0
> 255 0 0
> 0 4 20 24{ BASE -255
> 255 255 255
> 255 255 0
> 0 255 255
> 0 255 0
>
> Hopefully this helps...
>
> --
> Raul
>
> On Wed, Jun 24, 2015 at 1:37 AM, Linda Alvord <[email protected]>
> wrote:
> > Here's a pattern for a color cube. It still has an error in the FRONT
> > and the BASE. It will look better if that ever gets resolved. It is in
> simple J.
> >
> > load 'viewmat'
> > N=:<.63.8*i.5
> > BLACK=:25 3$0
> > BLUE=:(2#"1,.(4#0),N),.N,4#255
> > RED=:2 0 1{"1 BLUE
> > MAGENTA=:2 0 2{"1 BLUE
> > GREEN=:0 2 1{"1 BLUE
> > CYAN=:0 2 2{"1 BLUE
> > YELLOW=:2 2 0{"1 BLUE
> > WHITE=:25 3$255
> > A=:i.5 5
> > B=:5 5$0
> >
> > BACK=:25 3$,><"1 (0 1 2 3 4{GREEN)+"1/(0 1 2 3 4){BLUE BACK viewmat A
> >
> > TOP=:U=:25 3$,(0 1 2 3 4{RED)+"1/(0 1 2 3 4){BLUE TOP viewmat A;'TOP'
> >
> > LEFT=:25 3$,(0 1 2 3 4{GREEN)+"1/(0 1 2 3 4){RED LEFT viewmat A
> >
> > RIGHT=:R=:25 3$,P=:(8 7 6 5 4{CYAN)+"1/(8 7 6 5 4){MAGENTA RIGHT
> > viewmat A
> >
> > FRONT=:S=:25 3$,Q=:(8 7 6 5 4{YELLOW)+"1/(8 7 6 5 4){MAGENTA FRONT
> > viewmat A
> >
> > BASE=:25 3$,(8 7 6 5 4{CYAN)+"1/(8 7 6 5 4){YELLOW BASE viewmat A
> >
> > WOW=:(B,.(|.A),.B,.B),((|:|.25+A),.(50+A),.(|:|.|:|.75+A),.B)
> > WOW=:WOW,(B,.(|.|:|.100+A),.B,.B),B,.(125+A),.B,.B
> > (BACK,LEFT,TOP,RIGHT,FRONT,BASE) viewmat WOW
> >
> > Linda
> >
> > -----Original Message-----
> > From: [email protected]
> > [mailto:[email protected]] On Behalf Of Linda
> > Alvord
> > Sent: Sunday, June 14, 2015 8:52 PM
> > To: [email protected]
> > Subject: Re: [Jprogramming] Trouble making patter for a color cube
> >
> > Wow! It works in jgt also. I expected 6 or 7 separate images. That's
> > exciting.
> >
> > Linda
> >
> > -----Original Message-----
> > From: [email protected]
> > [mailto:[email protected]] On Behalf Of Linda
> > Alvord
> > Sent: Sunday, June 14, 2015 8:41 PM
> > To: [email protected]
> > Subject: Re: [Jprogramming] Trouble making patter for a color cube
> >
> > This is exactly where I was heading! It is quite beautiful and should
> "fold"
> > into a cube.
> >
> > I'd like to get it done "my way" and then I'll study yours and see
> > what will work best for beginners. I'm hoping it will interst young
> > children to "build" it themselves.
> >
> > Thank you! Linda
> >
> > -----Original Message-----
> > From: [email protected]
> > [mailto:[email protected]] On Behalf Of Raul
> > Miller
> > Sent: Sunday, June 14, 2015 10:14 AM
> > To: Programming forum
> > Subject: Re: [Jprogramming] Trouble making patter for a color cube
> >
> > My apologies.
> >
> > I left out the color definition line. (Brian Schott emailed me a note
> > about this, privately.)
> >
> > Here's what I think you need:
> >
> > 'BLACK BLUE GREEN CYAN RED MAGENTA YELLOW WHITE'=:#:i.8
> >
> > 'BLANK'=: <BLACK;BLACK;BLACK
> > 'BACK'=: <GREEN;CYAN;BLACK
> > 'LEFT'=: <GREEN;BLACK;YELLOW
> > 'TOP'=: <BLACK;BLUE;RED
> > 'RIGHT'=: <BLUE;CYAN;MAGENTA
> > 'FRONT'=: <RED;MAGENTA;YELLOW
> > 'BASE'=: <YELLOW;WHITE;GREEN
> >
> > squarecolor=:3 :0
> > 'O X Y'=. y
> > colors=. <.255*O+"1]0.25*((i.5)*/Y-"1 O)+"1/(i.5)*/X-"1 O
> > )
> >
> > require'viewmat'
> > cube=:3 :0
> > plan=: BASE(<3 1)}FRONT(<2 1)}(LEFT,TOP,RIGHT)1}BACK(<0 1)}4 3$BLANK
> > colors=: ,/,/>,"_1 each/"1 squarecolor each plan
> > colors viewmat i.20 15
> > )
> >
> > cube''
> >
> > And, once you have that, you may want to do something like this:
> >
> > setsize_jviewmat_ 750 1000
> > savemat_jviewmat_ jpath '~user/color-cube-page.png'
> >
> > Thanks,
> >
> > --
> > Raul
> >
> > On Sun, Jun 14, 2015 at 2:01 AM, Linda Alvord
> > <[email protected]>
> > wrote:
> >> This time I get an error after a large image of color stripes from
> >> red to blue.
> >>
> >> cube''
> >> |value error: BLACK
> >> | colors viewmat i.20 15
> >>
> >> I'm not sure how to fix it.
> >>
> >> Linda
> >>
> >>
> >> -----Original Message-----
> >> From: [email protected]
> >> [mailto:[email protected]] On Behalf Of Raul
> >> Miller
> >> Sent: Saturday, June 13, 2015 10:00 AM
> >> To: Programming forum
> >> Subject: Re: [Jprogramming] Trouble making patter for a color cube
> >>
> >> Ok, fair enough.
> >>
> >> New plan:
> >>
> >> TOP=:<,.'TOP';<2 2$;:'BLACK BLUE RED MAGENTA'
> >> BACK=:<,.'BACK';<2 2$;:'GREEN CYAN BLACK BLUE'
> >> FRONT=:<,.'FRONT';<2 2$;:'RED MAGENTA YELLOW WHITE'
> >> BASE=:<,.'BASE';<2 2$;:'YELLOW WHITE GREEN CYAN'
> >> LEFT=:<,.'LEFT';<2 2$;:'GREEN BLACK RED YELLOW'
> >> RIGHT=:<,.'RIGHT';<2 2$;:'BLUE CYAN MAGENTA WHITE'
> >> BASE(<3 1)}FRONT(<2 1)}(LEFT,TOP,RIGHT)1}BACK(<0 1)}4 3$a:
> >>
> >> Implementation:
> >>
> >> 'BLANK'=: <BLACK;BLACK;BLACK
> >> 'BACK'=: <GREEN;CYAN;BLACK
> >> 'LEFT'=: <GREEN;BLACK;YELLOW
> >> 'TOP'=: <BLACK;BLUE;RED
> >> 'RIGHT'=: <BLUE;CYAN;MAGENTA
> >> 'FRONT'=: <RED;MAGENTA;YELLOW
> >> 'BASE'=: <YELLOW;WHITE;GREEN
> >>
> >> squarecolor=:3 :0
> >> 'O X Y'=. y
> >> colors=. <.255*O+"1]0.25*((i.5)*/Y-"1 O)+"1/(i.5)*/X-"1 O
> >> )
> >>
> >> cube=:3 :0
> >> plan=: BASE(<3 1)}FRONT(<2 1)}(LEFT,TOP,RIGHT)1}BACK(<0 1)}4 3$BLANK
> >> ref=. ((75*i.4)+/5*i.3) +each <i.5 5
> >> colors=. ,/,/>,"_1 each/"1 squarecolor each plan
> >> colors viewmat i.20 15
> >> )
> >>
> >> cube''
> >>
> >> Technically, I didn't need to quote my color names, but I decided to
> >> leave the quotes in as emphasis (or, perhaps more accurately, to give
> >> some style to those particular names).
> >>
> >> Thanks,
> >>
> >> --
> >> Raul
> >>
> >>
> >> On Sat, Jun 13, 2015 at 5:11 AM, Linda Alvord
> >> <[email protected]>
> >> wrote:
> >>> Raul, I can see that a plan is useful. If you think of Black as no
> light.
> >>> Now build three axes. Blue is to the right (0 to 255). Red is
> >>> forward
> >> toward
> >>> you. And green moves up from the base. So
> >>>
> >>> I like your floor plan, Now LEFT and RIGHT are not oriented correctly.
> >>>
> >>> Try your code in JHS. There you can just place the images where you
> >>> want them.
> >>>
> >>> Linda
> >>>
> >>> -----Original Message-----
> >>> From: [email protected]
> >>> [mailto:[email protected]] On Behalf Of Linda
> >> Alvord
> >>> Sent: Saturday, June 13, 2015 4:40 AM
> >>> To: [email protected]
> >>> Subject: Re: [Jprogramming] Trouble making patter for a color cube
> >>>
> >>> Also, when I ran your code in jqt, I separated the separate images
> >>> and
> >> they
> >>> work together. However they are a horizontal flip of your layout
> >>> for the pieces. Linda
> >>>
> >>> -----Original Message-----
> >>> From: [email protected]
> >>> [mailto:[email protected]] On Behalf Of Linda
> >> Alvord
> >>> Sent: Saturday, June 13, 2015 4:25 AM
> >>> To: [email protected]
> >>> Subject: Re: [Jprogramming] Trouble making patter for a color cube
> >>>
> >>> Raul, I got an error after you layout appeared. Now that I removed
> >>> that line, I got your six images. They are correct Now put them into
> >>> your
> >> layout
> >>> pattern so that the correct colors are joined. And make one big
> >>> image with the correct sides joined.
> >>>
> >>> It still bothers me that two of the faces in my work aren't correct.
> >>> Now
> >> on
> >>> to study your strategy. Linda
> >>>
> >>> -----Original Message-----
> >>> From: [email protected]
> >>> [mailto:[email protected]] On Behalf Of Linda
> >> Alvord
> >>> Sent: Saturday, June 13, 2015 3:21 AM
> >>> To: [email protected]
> >>> Subject: Re: [Jprogramming] Trouble making patter for a color cube
> >>>
> >>> This a "Color Cube. It should print in color. And then you cut it
> >>> out and fold it up and you have a little cube with pretty colors
> >>> that will show
> >> you
> >>> lots of things about how light makescolors. Myc cube will only have
> >>> 125 colors, but it becomes infinite in your imagination.
> >>>
> >>> However, I will give some thought to what you sent. This is why the
> >>> forum
> >> is
> >>> such fun. Each person tackles a problem in a different way.
> >>>
> >>> Linda
> >>>
> >>> -----Original Message-----
> >>> From: [email protected]
> >>> [mailto:[email protected]] On Behalf Of Raul
> >>> Miller
> >>> Sent: Saturday, June 13, 2015 1:00 AM
> >>> To: Programming forum
> >>> Subject: Re: [Jprogramming] Trouble making patter for a color cube
> >>>
> >>> I got a lot of squares running your script, and the one that I
> >>> really
> >> liked
> >>> was the one that was labeled 'TOP'. So I'll base my implementation
> >>> on that one.
> >>>
> >>> For something as complicated as this, I think I'd like to sketch out
> >>> first how it's supposed to look.
> >>>
> >>> So here's my first sketch:
> >>> (<'BASE')(<3 1)}(<'FRONT')(<2 1)}(;:'LEFT TOP RIGHT')1}(<'BACK')(<0
> >>> 1)}4
> >>> 3$a:
> >>>
> >>> (beware line wrap - that's supposed to be a single line).
> >>>
> >>> But I also need to think about colors. After a little fiddling, I
> >>> decided
> >> to
> >>> go with this:
> >>>
> >>> TOP=:<,.'TOP';<2 2$;:'BLACK BLUE RED MAGENTA'
> >>> BACK=:<,.'BACK';<2 2$;:'GREEN CYAN BLACK BLUE'
> >>> FRONT=:<,.'FRONT';<2 2$;:'RED MAGENTA YELLOW WHITE'
> >>> BASE=:<,.'BASE';<2 2$;:'YELLOW WHITE GREEN CYAN'
> >>> LEFT=:<,.'LEFT';<2 2$;:'BLACK RED GREEN YELLOW'
> >>> RIGHT=:<,.'RIGHT';<2 2$;:'MAGENTA BLUE WHITE CYAN'
> >>> BASE(<3 1)}FRONT(<2 1)}(LEFT,TOP,RIGHT)1}BACK(<0 1)}4 3$a:
> >>>
> >>> with that out of the way, all I need is a routine to render squares,
> >>> the rest of the code almost writes itself:
> >>>
> >>> 'BLACK BLUE GREEN CYAN RED MAGENTA YELLOW WHITE'=:#:i.8
> >>>
> >>> square=:4 :0
> >>> 'O X Y'=. y
> >>> colors=. <.255*O+"1,/0.25*((i.5)*/Y-"1 O)+"1/(i.5)*/X-"1 O
> >>> colors viewmat (i.5 5);x
> >>> )
> >>>
> >>> 'BACK' square GREEN;CYAN;BLACK
> >>> 'LEFT' square BLACK;RED;GREEN
> >>> 'TOP' square BLACK;BLUE;RED
> >>> 'RIGHT' square MAGENTA;BLUE;WHITE
> >>> 'FRONT' square RED;MAGENTA;YELLOW
> >>> 'BASE' square YELLOW;WHITE;GREEN
> >>>
> >>> Good enough?
> >>>
> >>> Thanks,
> >>>
> >>> --
> >>> Raul
> >>>
> >>>
> >>> On Sat, Jun 13, 2015 at 12:04 AM, Linda Alvord
> >>> <[email protected]>
> >>> wrote:
> >>>> I am planning to begin a review of J Tech Grade 3 before
> >>>> introducing some new topics in Grade 4. I am making a pattern which
> >>>> could be printed and
> >>> then
> >>>> folded to form a color cube. It requires three dimensions for the
> >>>> three colors of light, Green, Red and Blue. I have the colors
> >>>> following the order of counting to 8 in base 2. The columns in the
> >>>> binary array
> >>> represent
> >>>> Green, Red and then Blue. This insures that the falues are in order
> >>>> from dark to light.
> >>>>
> >>>>
> >>>>
> >>>> The pattern must have six sides. All went well with the first 4
> >>>> sides, However the final two sides don't cooperate. I suspect there
> >>>> is some
> >>> little
> >>>> problem in viewmat. Here is my progress so far. The front and the
> >>>> bottom
> >>> are
> >>>> the problems. They both involve YELLOW.
> >>>>
> >>>>
> >>>>
> >>>> As is usual I welcome ways you may know to improve what I am trying
> >>>> to
> >> do.
> >>> I
> >>>> suggest using JHS to see how this is progressing.
> >>>>
> >>>>
> >>>>
> >>>> load 'viewmat'
> >>>>
> >>>> N=:<.63.8*i.5
> >>>>
> >>>> BLACK=:9 3$0
> >>>>
> >>>> BLUE=:(2#"1,.(4#0),N),.N,4#255
> >>>>
> >>>> RED=:(N,4#255),.2#"1,.(4#0),N
> >>>>
> >>>> MAGENTA=:(N,4#255),.((4#0),N),.N,4#255
> >>>>
> >>>> GREEN=:((4#0),N),.(N,4#255),.(4#0),N
> >>>>
> >>>> CYAN=:((4#0),N),.2#"1 ,.N,4#255
> >>>>
> >>>> YELLOW=:(2#"1 ,.N,4#255) ,.(4#0),N
> >>>>
> >>>> WHITE=:9 3$255
> >>>>
> >>>> (#:i.8);'BLACK','BLUE','RED','MAGENTA','GREEN','CYAN','YELLOW',:'WHITE'
> >>>>
> >>>>
> >>>>
> >>>> A=:<.0.5*(i.5 5)+i.5 5
> >>>>
> >>>>
> >>>>
> >>>> BLANK=:25 3$255
> >>>>
> >>>> BACK=:25 3$,><"1 (0 1 2 3 4{GREEN)+"1/(0 1 2 3 4){BLUE
> >>>>
> >>>> BACK viewmat A
> >>>>
> >>>> (BACK,BLANK)viewmat (25+A),.|.A
> >>>>
> >>>>
> >>>>
> >>>> TOP=:25 3$,><"1 (0 1 2 3 4{RED)+"1/(0 1 2 3 4){BLUE
> >>>>
> >>>> TOP viewmat A;'TOP'
> >>>>
> >>>> LEFT=:25 3$,><"1 (0 1 2 3 4{GREEN)+"1/(0 1 2 3 4){RED
> >>>>
> >>>> LEFT viewmat A
> >>>>
> >>>> (TOP,LEFT) viewmat (25+|:|.A),.A
> >>>>
> >>>>
> >>>>
> >>>> ((TOP,LEFT) viewmat (25+|:|.A),.A),.(BACK,BLANK)viewmat (25+A),.|.A
> >>>>
> >>>>
> >>>>
> >>>> RIGHT=:R=:25 3$,><"1 P=:(8 7 6 5 4{CYAN)+"1/(8 7 6 5 4){MAGENTA
> >>>>
> >>>> RIGHT viewmat A
> >>>>
> >>>>
> >>>>
> >>>> FRONT=:S=:25 3$,><"1 Q=:(8 7 6 5 4{YELLOW)+"1/(8 7 6 5 4){MAGENTA
> >>>>
> >>>> FRONT viewmat A
> >>>>
> >>>>
> >>>>
> >>>> BOTTOM=:25 3$,><"1 (8 7 6 5 4{CYAN)+"1/(8 7 6 5 4){YELLOW
> >>>>
> >>>> BOTTOM viewmat A
> >>>>
> >>>>
> >>>>
> >>>> R;S
> >>>>
> >>>>
> >>>>
> >>>> I included R;S to show how close the good and the bad faces are
> >>>> prior to using viewmat.
> >>>>
> >>>>
> >>>>
> >>>> Linda
> >>>>
> >>>>
> >>>>
> >>>> -------------------------------------------------------------------
> >>>> -
> >>>> -- For information about J forums see
> >>>> 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
> >>>
> >>> --------------------------------------------------------------------
> >>> -
> >>> - For information about J forums see
> >>> 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
> >> ---------------------------------------------------------------------
> >> - For information about J forums see
> >> 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
> >
> > ----------------------------------------------------------------------
> > For information about J forums see 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
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
>
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
--
regards,
====================================================
GPG key 1024D/4434BAB3 2008-08-24
gpg --keyserver subkeys.pgp.net --recv-keys 4434BAB3
gpg --keyserver subkeys.pgp.net --armor --export 4434BAB3
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
