Thank you very much! I got a lot smarter. But the trick is still that I don't 
need to replace the 0 with 1, but to add 1. There might be cases when I need to 
add 1 several times. For example, if 

c=. 1 3 3 ; 2; 0; 0

then in 1st row 4th position I have to replace 0 with 2.

Kairit

> -----Original Message-----
> From: [EMAIL PROTECTED] [mailto:programming-
> [EMAIL PROTECTED] On Behalf Of Björn Helgason
> Sent: Monday, November 27, 2006 9:16 AM
> To: Programming forum
> Subject: Re: [Jprogramming] updating matrix cell values
> 
> 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