Nothing personal intended.

R.E. Boss


> -----Oorspronkelijk bericht-----
> Van: Programming <[email protected]>
> Namens Raul Miller
> Verzonden: woensdag 23 oktober 2019 18:52
> Aan: Programming forum <[email protected]>
> Onderwerp: Re: [Jprogramming] Multiple Takes
> 
> Sure... if you change the problem it's important to change the solution to
> match...
> 
> Thanks,
> 
> --
> Raul
> 
> 
> 
> On Wed, Oct 23, 2019 at 12:49 PM R.E. Boss <[email protected]> wrote:
> >
> > The solutions with { are rather inefficient as one can imagine, which can be
> seen by scaling
> >
> >    ts' ~.".~.@>,{10#<''0123456789'''
> > |limit error: ts
> > |   ~.".~.@>,    {10#<'0123456789'
> >
> > De Forcrand's solution was better (at least it had one)
> >
> >    ts'~. ; (#:i.2^10) <@(10 #. i.@!@# A. ])@# i.10
> > 5.1813604 1.1912583e9
> >
> > My solution scored in the same order
> >
> >    ts'foo i.10'
> > 5.713089 1.1684645e9
> >
> >    (foo i.10) =&#  ~. ; (#:i.2^10) <@(10 #. i.@!@# A. ])@# i.10
> > 1
> >
> > With
> >
> > foo=: 3 : 0
> >  t=:<,.y
> >  r=. ([,-.~)"0 1~"1 y
> >  for_k. >:i.2-~#y do.
> >   t=: t,<(k+1){."1 r=.,/(k&{.(,"1 ([,-.~)"0 1~) k&}.)"1 r
> >  end.
> >  t=: t,< y(],-.)"1>{:t
> >  ~.;10#.L:0 t
> > )
> >
> > R.E Boss
> >
> >
> > > -----Oorspronkelijk bericht-----
> > > Van: Programming <[email protected]>
> > > Namens Raul Miller
> > > Verzonden: maandag 21 oktober 2019 22:22
> > > Aan: Programming forum <[email protected]>
> > > Onderwerp: Re: [Jprogramming] Multiple Takes
> > >
> > > You can shave a character or so off that last one (using @ instead of "1):
> > >
> > >    ~.".~.@>,{4#<'0126'
> > > 0 1 2 6 12 16 21 26 61 62 126 162 216 261 612 621 10 102 106 1026 1062
> > > 120 160 1206 1260 1602 1620 20 201 206 2016 2061 210 2106 2160 260
> > > 2601 2610 60 601 602 6012 6021 610 6102 6120 620 6201 6210
> > >
> > > (And, yes, I hadn't read the thread to notice the omitted requirement.)
> > >
> > > (Also, thinking about this thread: the A. approach winds up being far
> more
> > > verbose because implied leading zeros don't matter (could repeat), and
> > > numeric approaches tend to need 10#. instead of ". among other things
> > > which make them verbose.)
> > >
> > > Thanks,
> > >
> > > --
> > > Raul
> > >
> > > On Mon, Oct 21, 2019 at 3:11 PM Roger Hui
> <[email protected]>
> > > wrote:
> > > >
> > > > ~. 10&#.@~.&> , { 4#<0 1 2 6
> > > > ~. ". ~."1 > , {4#<'0126'
> > > >
> > > >
> > > >
> > > > On Mon, Oct 21, 2019 at 11:46 AM Skip Cave
> <[email protected]>
> > > wrote:
> > > >
> > > > > Wow! I hadn't really realized the power of catalogue '{'. This was a
> > > > > great learning experience. Thanks to everyone for the posts.
> > > > >
> > > > > ...
> > > > >
> > > > > Is there any way to get rid of the extra 'eaches' in the function?
> > > > > Or is that the route I must take to use integers instead of 
> > > > > characters?
> > > > >
> > > > ----------------------------------------------------------------------
> > > > 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