This is pretty nice!

I was trying to come up with something like this but failed

How did you arrive at this expression?


2006/11/26, Oleg Kobchenko <[EMAIL PROTECTED]>:

c 1:`(>@[)`]}"0 1 m
0 1 0 1
0 0 1 0
1 0 0 0
1 0 0 0


----- Original Message ----
From: Björn Helgason <[EMAIL PROTECTED]>
To: Programming forum <[email protected]>
Sent: Sunday, November 26, 2006 3:56:02 PM
Subject: Re: [Jprogramming] updating matrix cell values


c=.1 3;2;0;0
   c
┌───┬─┬─┬─┐
│1 3│2│0│0│
└───┴─┴─┴─┘
   m=.4 4$0
   m
0 0 0 0
0 0 0 0
0 0 0 0
0 0 0 0
   1(; c ,&.> ~ &.> i.4) }m
0 1 0 1
0 0 1 0
1 0 0 0
1 0 0 0


2006/11/26, Björn Helgason <[EMAIL PROTECTED]>:
>
>    c=:0 1; 0 3;1 2;2 0;3 0
>    1 c} m
> 0 1 0 1
> 0 0 1 0
> 1 0 0 0
> 1 0 0 0
>
>
> 2006/11/26, Kairit Sirts <[EMAIL PROTECTED]>:
> >
> > Hi!
> >
> > But now another problem:
> >
> > >    a =: ;: 'he ha ho he hi he'
> > >    b =: ~. a
> >      c =: 1 4; 2 ; 3; 5
> > >    d =: c { each <b i. a
> > > +---+-+-+-+
> > > |1 3|2|0|0|
> > > +---+-+-+-+
> > >
> >
> > Now I have the following matrix:
> >
> > m =: ((#b), #b) $ 0
> >
> > and I have to fill it based on the information in d. Each cell of d
> > corresponds to each row of m. Indexes in cells show which positions in
> > that
> > row in m should be incremented by one.
> >
> > After this procedure using example data above the m should look the
> > following:
> >
> > m
> > 0 1 0 1
> > 0 0 1 0
> > 1 0 0 0
> > 1 0 0 0
> >
> > I studied the vocabulary and the following verbs seem to be useful for
> > this
> > task:
> > Dyad {:: for selecting items from d, but I understand that it cannot
be
> > used
> > for selecting several items (for example i.3 {:: d).
> > m} for amending the matrix elements, but how to use it for replacing
the
> >
> > cell value with the current cell value + 1?
> >
> > Any other suggestions, which verbs to use and how to combine them to
get
> > the
> > task done?
> >
> > Kairit
> >
> >
> > ----------------------------------------------------------------------
> > For information about J forums see http://www.jsoftware.com/forums.htm
> >
>
>
>
> --
> Björn Helgason, Verkfræðingur
> Fugl&Fiskur ehf, Þerneyjarsund 23, Box 127
> 801 Grímsnes ,t-póst: [EMAIL PROTECTED]
> Skype: gosiminn, gsm: +3546985532
> Landslags og skrúðgarðagerð, gröfuþjónusta
> http://groups.google.com/group/J-Programming
>
>
> Tæknikunnátta höndlar hið flókna, sköpunargáfa er meistari
einfaldleikans
>
> góður kennari getur stigið á tær án þess að glansinn fari af skónum
>           /|_      .-----------------------------------.
>          ,'  .\  /  | Með léttri lund verður        |
>      ,--'    _,'   | Dagurinn í dag                     |
>     /       /       | Enn betri en gærdagurinn  |
>    (   -.  |        `-----------------------------------'
>    |     ) |        (\_ _/)
>   (`-.  '--.)       (='.'=)
>    `. )----'        (")_(")




--
Björn Helgason, Verkfræðingur
Fugl&Fiskur ehf, Þerneyjarsund 23, Box 127
801 Grímsnes ,t-póst: [EMAIL PROTECTED]
Skype: gosiminn, gsm: +3546985532
Landslags og skrúðgarðagerð, gröfuþjónusta
http://groups.google.com/group/J-Programming


Tæknikunnátta höndlar hið flókna, sköpunargáfa er meistari einfaldleikans

góður kennari getur stigið á tær án þess að glansinn fari af skónum
          /|_      .-----------------------------------.
         ,'  .\  /  | Með léttri lund verður        |
     ,--'    _,'   | Dagurinn í dag                     |
    /       /       | Enn betri en gærdagurinn  |
   (   -.  |        `-----------------------------------'
   |     ) |        (\_ _/)
  (`-.  '--.)       (='.'=)
   `. )----'        (")_(")
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm




____________________________________________________________________________________
Cheap talk?
Check out Yahoo! Messenger's low PC-to-Phone call rates.
http://voice.yahoo.com
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm




--
Björn Helgason, Verkfræðingur
Fugl&Fiskur ehf, Þerneyjarsund 23, Box 127
801 Grímsnes ,t-póst: [EMAIL PROTECTED]
Skype: gosiminn, gsm: +3546985532
Landslags og skrúðgarðagerð, gröfuþjónusta
http://groups.google.com/group/J-Programming


Tæknikunnátta höndlar hið flókna, sköpunargáfa er meistari einfaldleikans

góður kennari getur stigið á tær án þess að glansinn fari af skónum
         /|_      .-----------------------------------.
        ,'  .\  /  | Með léttri lund verður        |
    ,--'    _,'   | Dagurinn í dag                     |
   /       /       | Enn betri en gærdagurinn  |
  (   -.  |        `-----------------------------------'
  |     ) |        (\_ _/)
 (`-.  '--.)       (='.'=)
  `. )----'        (")_(")
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to