or f=: [: ? 2 10 $ 6"_ or f=: [: ? 2 10 $ 6: f'' 3 1 3 3 3 3 2 1 2 5 4 4 3 1 4 5 3 2 0 5
On Sun, Dec 4, 2011 at 11:04 PM, Kip Murray <k...@math.uh.edu> wrote: > f=:[:?2 10 $ 6 > |domain error > | f=: [:?2 10$6 > f =: [: ? (2 10 $ 6)"_ > f'' > 0 3 2 2 2 0 2 4 2 2 > 2 4 4 3 4 1 3 5 2 5 > f'' > 2 5 1 3 3 3 4 5 1 0 > 5 0 5 0 3 0 1 3 5 1 > > What are you doing up at 3:35 AM CST? > > On 12/4/2011 3:35 AM, Linda Alvord wrote: >> f=:[:?2 10 $ 6 >> >> -----Original Message----- >> From: programming-boun...@jsoftware.com >> [mailto:programming-boun...@jsoftware.com] On Behalf Of Linda Alvord >> Sent: Sunday, December 04, 2011 4:32 AM >> To: 'Programming forum' >> Subject: Re: [Jprogramming] Turkey Roll - Challenge 2 >> >> Me too. >> >> toss =: (dice =: (6 6 6#:12 145 157 185 197 215)<@:{"1 2 (#:i.6){' o'){~ 2 >> 10 ?@$ 6: >> a=:' o' >> b=:#:i.6 >> d=:b{a >> e=:6 6 6#:12 145 157 185 197 215 >> dice=: e<@:{"1 2 d >> dice >> f=:2 10?@ $ 6: >> c=: 13 :'(2 10?@$6:){dice' >> c'' >> toss =:dice{~f >> c'' >> toss'' >> c'' >> toss'' >> c'' >> 5!:2 ;:'a b d e dice f c toss' >> >> I can't get the toss to work >> >> Linda >> >> -----Original Message----- >> From: programming-boun...@jsoftware.com >> [mailto:programming-boun...@jsoftware.com] On Behalf Of Ric Sherlock >> Sent: Sunday, December 04, 2011 4:09 AM >> To: Programming forum >> Subject: Re: [Jprogramming] Turkey Roll - Challenge 2 >> >> NB. Inspired by Henry's dice: >> >> facechars=: ' o' >> facerows=: #: i.6 >> faces=: 6 #.inv 12 145 157 185 197 215 >> dice=:<"2 facechars {~ facerows {~ faces NB. create dice >> dvals=: 1 + i. # dice >> >> NB. Sort of what you've asked for: >> >> throw=: ] {~ [: ? [ $ [: # ] NB. verb to throw dice >> throw210=: 2 10 throw ] NB. throw 2 dice 10 times >> displayDi=: dice {~<: NB. show dice >> toss=: [: displayDi throw210 NB. throw 2 dice 10 times >> >> dvals >> 1 2 3 4 5 6 >> throw210 dvals >> 2 3 6 4 5 3 5 5 1 5 >> 5 3 3 5 5 3 2 4 3 4 >> displayDi throw210 dvals NB. display as toss as dice >> toss dvals NB. equivalent as single verb >> toss dvals >> >> I don't really like hiding the assignment of a global noun inside the >> verb toss but if I had to do it: >> >> tossc=: 3 : 'displayDi c =: throw210 y' >> >> On Sun, Dec 4, 2011 at 4:40 AM, Linda Alvord<lindaalv...@verizon.net> >> wrote: >>> I'm comparing tosses, so could you match this in your own style: >>> >>> sla=: 13 :'cla=:1+? 2 10$y' >>> tossla=: 13 :'(<"2)3 3$"1(<:sla y){d' >>> tossla 6 >>> cla >>> tossla 6 >>> cla >>> >>> My c is a noun of the actual "dice" that are tossed. The display should >>> no longer be necessary for everyone to know what is happening. >>> >>> Toss will then require the number of faces on the die. This will ultimate >>> be the result of a toss. >>> >>> throwrs=: ] {~ [: ? [ $ [: # ] >>> tossrs=: 2 10 throw dice >>> >>> Thanks in advance. I'm enjoying your style. >>> >>> Linda >>> >>> -----Original Message----- >>> From: programming-boun...@jsoftware.com >>> [mailto:programming-boun...@jsoftware.com] On Behalf Of Ric Sherlock >>> Sent: Thursday, December 01, 2011 6:01 AM >>> To: Programming forum >>> Subject: Re: [Jprogramming] Turkey Roll - Challenge 2 >>> >>> The following is getting away from the actual rules as of the task but >>> is perhaps useful nonetheless ... >>> >>> From a storage and processing POV, it will be leaner and faster not to >>> store the dice boxed. The boxing is nice for display purposes though >>> so that could be made a separate verb. >>> >>> facerows=: 0 0 0,1 0 0,0 1 0,0 0 1,:1 0 1 NB. row types on faces >>> facechars=: ' o' NB. chars used to draw faces >>> faces=: 0 2 0,1 0 3,1 2 3,4 0 4,4 2 4,:4 4 4 NB. define faces as rows >>> dice=: facechars {~ facerows {~ faces NB. create dice >>> displayDice=: [: smoutput<"2 NB. display boxed di >>> throw=: ] {~ [: ? [ $ [: # ] NB. verb to throw dice >>> toss=: 2 10 throw ] NB. throw 2 dice 10 times >>> sumThrows=: [: +/ [: ([: +/ ,)"2 'o' = ] NB. sum each throw >>> fd=: [: /:~ ({. , #)/.~ NB. calc frequency >> distribution >>> >>> displayDice dice >>> +---+---+---+---+---+---+ >>> | |o |o |o o|o o|o o| >>> | o | | o | | o |o o| >>> | | o| o|o o|o o|o o| >>> +---+---+---+---+---+---+ >>> displayDice Toss1=: toss dice >>> +---+---+---+---+---+---+---+---+---+---+ >>> |o |o |o o|o | |o o| |o |o o|o | >>> | o | o |o o| o | o | | o | o | | o | >>> | o| o|o o| o| |o o| | o|o o| o| >>> +---+---+---+---+---+---+---+---+---+---+ >>> |o | |o | |o o| |o o|o |o o|o o| >>> | | o | o | o | | o | | o |o o| | >>> | o| | o| |o o| |o o| o|o o|o o| >>> +---+---+---+---+---+---+---+---+---+---+ >>> sumThrows Toss1 >>> 5 4 9 4 5 5 5 6 10 7 >>> ---------------------------------------------------------------------- >>> 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
