Here's a script for finding combinations along with a ds display: require '~addons/debug/dissect/dissect.ijs'
comb=: 13 :'((x="1 +/"1 #:i.2^y)##:i.2^y)#"1 i.y' comb 3 comb 5 ds '3((([ ="1 [: +/"1 [: #: [: i. 2 ^ ]) # [: #: [: i. 2 ^ ]) #"1 [: i. ])5' Linda -----Original Message----- From: [email protected] [mailto:[email protected]] On Behalf Of Linda Alvord Sent: Thursday, June 06, 2013 2:03 AM To: [email protected] Subject: Re: [Jprogramming] z458095869_dissectnopath_ Henry, Earlier I thought I couldn't use a function inside another function, but it seems now that I can. require '~addons/debug/dissect/dissect.ijs' pas=: 13 :'(i.>:y)!y' NB. BINOMIAL PROBABILITIES bp=: 13 :' (pas x)*(y^ i.>:x)*(1-y)^ |. i.>:x' ds 'pas 3' ds '3(([: pas [) * (] ^ [: i. [: >: [) * (1 - ]) ^ [: |. [: i. [: >: [)0.9' Linda -----Original Message----- From: [email protected] [mailto:[email protected]] On Behalf Of Linda Alvord Sent: Wednesday, June 05, 2013 9:54 PM To: [email protected] Subject: Re: [Jprogramming] z458095869_dissectnopath_ I just realized what I did. By mistake I wrote ds=: and realized it and knew I had to restart jqt. When I did all was fine. Sorry to bother you. Linda -----Original Message-----d Froam: [email protected] [mailto:[email protected]] On Behalf Of Henry Rich Sent: Wednesday, June 05, 2013 9:26 PM To: [email protected] Subject: Re: [Jprogramming] z458095869_dissectnopath_ Are you sure? When I run ds '2([: |: ([ = [: +/ [: |: #~ #: [: i. ^) #"1 [: |: #~ #: [: i. ^)4' I get a valid display. There seems to be a weird () following the 2 in your version. Henry Rich On 6/5/2013 9:19 PM, Linda Alvord wrote: > Henry, I used your ds version of cr and used it to rewrite a > shorter version of cr. > > require '~addons/debug/dissect/dissect.ijs' > > cr=: 13 :'|:(x= +/ |:(y#x)#:i.x^y) #"1 |:(y#x)#:i.x^y' > cr > [: |: ([ = [: +/ [: |: #~ #: [: i. ^) #"1 [: |: #~ #: [: i. ^ > > 2 cr 4 > 0 0 1 1 > 0 1 0 1 > 0 1 1 0 > 1 0 0 1 > 1 0 1 0 > 1 1 0 0 > > ds '2([: |: ([ = [: +/ [: |: #~ #: [: i. ^) #"1 [: |: #~ #: [: i. ^)4' > |syntax error: ds > | 2()[:|:([=[:+/[:|:#~#:[:i.^)#"1[:|:#~#:[:i.^)4 > > Something in the new version is not working. > > Linda > > -----Original Message----- > From: [email protected] > [mailto:[email protected]] On Behalf Of Linda > Alvord > Sent: Wednesday, June 05, 2013 7:59 PM > To: [email protected] > Subject: Re: [Jprogramming] z458095869_dissectnopath_ > > Henry, After an upgrade a click on an array in a red box will appear > in a grid. Now hist 8 appears in the grid with a scroll bar. Impressive. > > Also, 2 cr 5 > > Thanks. I'm already finding ds useful. Linda > > > -----Original Message----- > From: [email protected] > [mailto:[email protected]] On Behalf Of Henry > Rich > Sent: Wednesday, June 05, 2013 11:57 AM > To: [email protected] > Subject: Re: [Jprogramming] z458095869_dissectnopath_ > > I have fixed the errors you found, in cr and in launching a grid. > > Henry Rich > > On 6/5/2013 3:04 AM, Linda Alvord wrote: >> I'm working on simplifying cr but here is what happens now. >> >> cr=:[: |: ([ = [: +/ [: ([: |: ] #: [: i. */) 2 $~ ]) #"1 [: ([: >> |: ] > #: >> [: i. */) 2 $~ ] >> 2 cr 4 >> 0 0 1 1 >> 0 1 0 1 >> 0 1 1 0 >> 1 0 0 1 >> 1 0 1 0 >> 1 1 0 0 >> ds '2 ([: |: ([ = [: +/ [: ([: |: ] #: [: i. */) 2 $~ ]) #"1 [: >> ([: |: ] >> #: [: i. */) 2 $~ ])4' >> length error >> |length error: combineheights >> | estheights=:estheights__vop combineheights estheights__uop >> >> unknown error during parsing >> >> Probably you will spot right away why ds is unhappy. >> >> Linda >> -----Original Message----- >> From: [email protected] >> [mailto:[email protected]] On Behalf Of Linda >> Alvord >> Sent: Wednesday, June 05, 2013 2:16 AM >> To: [email protected] >> Subject: Re: [Jprogramming] z458095869_dissectnopath_ >> >> Here's a shorter route to the same problem: >> >> require '~addons/debug/dissect/dissect.ijs' >> >> hist=: 13 :''' O''{~((i.>:y)!y)>/i.>./(i.>:y)!y' >> hist >> >> hist 8 >> >> ds '('' O'' {~ (] !~ [: i. >:) >/ [: i. [: >./ ] !~ [: i. >:)8' >> >> Linda >> >> -----Original Message----- >> From: [email protected] >> [mailto:[email protected]] On Behalf Of Linda >> Alvord >> Sent: Wednesday, June 05, 2013 1:36 AM >> To: [email protected] >> Subject: Re: [Jprogramming] z458095869_dissectnopath_ >> >> Henry, >> >> I get an error box if I click on the data in an error box in red: >> >> --------------------------- >> wdhandler >> --------------------------- >> error in: dissect_dissectisi_mbldown >> >> xywh : command not found: wd >> (wd ::(''"_)'qer') (13!:8)3 >> --------------------------- >> OK >> >> If I look in the Term window this message is repeated quite a few times. >> >> >> error in paint >> assertion failure >> |assertion failure: initevents >> | 0~:GRIDHWNDC >> >> Clicking on data in red boxes doesn't work >> >> --------------------------- >> wdhandler >> --------------------------- >> error in: dissect_dissectisi_mbldown >> >> xywh : command not found: wd >> (wd ::(''"_)'qer') (13!:8)3 >> --------------------------- >> OK >> >> >> error in paint >> assertion failure >> |assertion failure: initevents >> | 0~:GRIDHWNDC >> >> >> JVERSION >> Engine: j701/2011-01-10/11:25 >> Library: 8.01.011 >> Qt IDE: 1.0.10 >> Platform: Win 32 >> Installer: j801 beta install >> InstallPath: c:/users/owner/j801 >> >> All files are upgraded and installed. >> >> Maybe this helps. >> >> Linda >> >> -----Original Message----- >> From: [email protected] >> [mailto:[email protected]] On Behalf Of Henry >> Rich >> Sent: Tuesday, June 04, 2013 9:43 PM >> To: [email protected] >> Subject: Re: [Jprogramming] z458095869_dissectnopath_ >> >> The result's not too large. It's just not all displayed. The red >> border around the value is the clue that the value has been truncated >> for > display. >> When you see that, you can click on the truncated value to get a grid >> that will show you the entire value. >> >> Henry Rich >> >> On 6/4/2013 9:41 PM, Linda Alvord wrote: >>> Henry, What I meant was the error that begins when ds indicates a >>> list of length 70 and only shows a 27 element list. Then the >>> final table claims shape 9 70 but only shows 9 27. >>> >>> Shouldn't there be a message like "result too large" or something? >>> >>> Linda >>> >>> -----Original Message----- >>> [mailto:[email protected]] >>> On Behalf Of Henry Rich >>> Sent: Tuesday, June 04, 2013 2:53 PM >>> To: [email protected] >>> Subject: Re: [Jprogramming] z458095869_dissectnopath_ >>> >>> OK, I have fixed the grid display. When you have an oversize >>> result, clicking on it launches a grid to display the entire result. >>> >>> Linda, is this what you meant by 'beyond the capacity of ds'? >>> >>> Henry Rich >>> >>> On 6/4/2013 12:00 AM, Raul Miller wrote: >>>> Perhaps ds should have scrollbars for displaying large things? >>>> (Though ideally this should go in wd's implementation, at least as >>>> an option, and screen resources for things not in view could >>>> perhaps be avoided. I'm thinking of something like the css >>>> overflow: scroll mechanism for html.) >>>> >>> -------------------------------------------------------------------- >>> - >>> - 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
