What do you mean by "correctly"?

(I'm afraid I'm a bit lost here.)

Thanks,

-- 
Raul


On Sun, Jun 14, 2015 at 10:35 PM, Linda Alvord <[email protected]> wrote:
> Raul, Now can I convince you that there is a problem with viewmat. Shouldn't
> the two arrays R and S both work correctly?
>
> load 'viewmat'
>    N=:<.63.8*i.5
>    MAGENTA=:(N,4#255),.((4#0),N),.N,4#255
>    YELLOW=:(2#"1 ,.N,4#255) ,.(4#0),N
>    CYAN=:((4#0),N),.2#"1 ,.N,4#255
>    A=:<.0.5*(i.9 9)+i.9 9
>    S=:81 3$,><"1 (|.YELLOW)+"1/|.MAGENTA
>    S viewmat A
>    T=:81 3$,><"1 (|.CYAN)+"1/|.MAGENTA
>    T viewmat A
>
>    S;T
> ------------T-----------┐
> │510 510 510│510 510 510│
> │510 446 510│510 446 510│
> │510 382 510│510 382 510│
> │510 318 510│510 318 510│
> │510 255 510│510 255 510│
> │446 255 446│446 255 446│
> │382 255 382│382 255 382│
> │318 255 318│318 255 318│
> │255 255 255│255 255 255│
> │510 510 446│446 510 510│
> │510 446 446│446 446 510│
> │510 382 446│446 382 510│
> │510 318 446│446 318 510│
> │510 255 446│446 255 510│
> │446 255 382│382 255 446│
> │382 255 318│318 255 382│
> │318 255 254│254 255 318│
> │255 255 191│191 255 255│
> │510 510 382│382 510 510│
> │510 446 382│382 446 510│
> │510 382 382│382 382 510│
> │510 318 382│382 318 510│
> │510 255 382│382 255 510│
> │446 255 318│318 255 446│
> │382 255 254│254 255 382│
> │318 255 190│190 255 318│
> │255 255 127│127 255 255│
> │510 510 318│318 510 510│
> │510 446 318│318 446 510│
> │510 382 318│318 382 510│
> │510 318 318│318 318 510│
> │510 255 318│318 255 510│
> │446 255 254│254 255 446│
> │382 255 190│190 255 382│
> │318 255 126│126 255 318│
> │255 255  63│ 63 255 255│
> │510 510 255│255 510 510│
> │510 446 255│255 446 510│
> │510 382 255│255 382 510│
> │510 318 255│255 318 510│
> │510 255 255│255 255 510│
> │446 255 191│191 255 446│
> │382 255 127│127 255 382│
> │318 255  63│ 63 255 318│
> │255 255   0│  0 255 255│
> │446 446 255│255 446 446│
> │446 382 255│255 382 446│
> │446 318 255│255 318 446│
> │446 254 255│255 254 446│
> │446 191 255│255 191 446│
> │382 191 191│191 191 382│
> │318 191 127│127 191 318│
> │254 191  63│ 63 191 254│
> │191 191   0│  0 191 191│
> │382 382 255│255 382 382│
> │382 318 255│255 318 382│
> │382 254 255│255 254 382│
> │382 190 255│255 190 382│
> │382 127 255│255 127 382│
> │318 127 191│191 127 318│
> │254 127 127│127 127 254│
> │190 127  63│ 63 127 190│
> │127 127   0│  0 127 127│
> │318 318 255│255 318 318│
> │318 254 255│255 254 318│
> │318 190 255│255 190 318│
> │318 126 255│255 126 318│
> │318  63 255│255  63 318│
> │254  63 191│191  63 254│
> │190  63 127│127  63 190│
> │126  63  63│ 63  63 126│
> │ 63  63   0│  0  63  63│
> │255 255 255│255 255 255│
> │255 191 255│255 191 255│
> │255 127 255│255 127 255│
> │255  63 255│255  63 255│
> │255   0 255│255   0 255│
> │191   0 191│191   0 191│
> │127   0 127│127   0 127│
> │ 63   0  63│ 63   0  63│
> │  0   0   0│  0   0   0│
> L-----------+---------------
>
> 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

Reply via email to