Thanks to all I have a lot to study from your example I think I have got the &.|: command ad the take
I thought my previous try was a bit confusing using shift to insert values anyway I see J allows to reach results in many different ways Paolo On Mon, Jul 20, 2015 at 10:22 PM, Linda Alvord <[email protected]> wrote: > It doesn't have to be hard! You are progressingj well. Here's where you > are so far. Take pme ste[ at a to,e frm right to left an it will make good > sense... > > > ]T=:(<"0)2|."1(,.0 0 0),.2|."1"1 i.3 3 > ┌─┬─┬─┬─┐ > │0│1│0│2│ > ├─┼─┼─┼─┤ > │3│4│0│5│ > ├─┼─┼─┼─┤ > │6│7│0│8│ > └─┴─┴─┴─┘ > > Linda > > -----Original Message----- > From: [email protected] [mailto: > [email protected]] On Behalf Of Kip Murray > Sent: Monday, July 20, 2015 9:18 AM > To: [email protected] > Subject: Re: [Jprogramming] insert column into tables > > Following up on Raul's "use transpose" idea: > > tbl > 0 1 2 > 3 4 5 > 6 7 8 > insertcol =: 1 : '({. , m , }.)&.|:' > 2 (0 0 0 insertcol) tbl > 0 1 0 2 > 3 4 0 5 > 6 7 0 8 > > --Kip Murray > > On Monday, July 20, 2015, Raul Miller <[email protected]> wrote: > > > The classic "insertion" method for J is to use {. for the part before > > the insertion and }. for the part after the insertion. > > > > An example of this might be: > > table =: 3 3 $ <"0 i.9 > > column =: 3 1$ (<,'0') > > column ((2{."1]),.[,.2}."1]) table > > > > But it also might be simpler to use transpose: > > column ((2{.]), [, 2}.])&.|: table > > > > Another alternative uses # with a complex left argument (or #inv with > > a zero in the left argument). I've seen some examples of that here, so > > I won't post more of them. > > > > Another alternative, though, involves tacking the column onto the end > > of the table and then reordering: > > (<_2}.i._4) C."1 table,.column > > > > (There are other ways of accomplishing the reordering, but I think > > this is the clearest. The i._4 cycle rotates things in the direction > > we want, and the _2 drops the two smallest indexes from the > > permutation, and the net result is that the column moves to column > > index 2 of the result.) > > > > I expect that there could be other ways also, but this is all that > > occur to me at the moment. > > > > Thanks, > > > > -- > > Raul > > > > > > On Mon, Jul 20, 2015 at 8:11 AM, Strale <[email protected] > > <javascript:;>> > > wrote: > > > Hello > > > > > > I am trying to combine Tables togethers > > > > > > for example I would like to insert column before the column 2 of the > > table > > > > > > [table =. 3 3 $ <"0 i.9 > > > > > > ┌─┬─┬─┐ > > > > > > │0│1│2│ > > > > > > ├─┼─┼─┤ > > > > > > │3│4│5│ > > > > > > ├─┼─┼─┤ > > > > > > │6│7│8│ > > > > > > └─┴─┴─┘ > > > > > > > > > [column =. 3 1$ (<,'0') > > > > > > ┌─┐ > > > > > > │0│ > > > > > > ├─┤ > > > > > > │0│ > > > > > > ├─┤ > > > > > > │0│ > > > > > > └─┘ > > > > > > > > > > > > the solution I have found at the moment is the following: > > > > > > > > > [tab2 =. 2|."1 table > > > > > > ┌─┬─┬─┐ > > > > > > │2│0│1│ > > > > > > ├─┼─┼─┤ > > > > > > │5│3│4│ > > > > > > ├─┼─┼─┤ > > > > > > │8│6│7│ > > > > > > └─┴─┴─┘ > > > > > > > > > [tab3 =. column ,"1 1 tab2 > > > > > > ┌─┬─┬─┬─┐ > > > > > > │0│2│0│1│ > > > > > > ├─┼─┼─┼─┤ > > > > > > │0│5│3│4│ > > > > > > ├─┼─┼─┼─┤ > > > > > > │0│8│6│7│ > > > > > > └─┴─┴─┴─┘ > > > > > > > > > Result: > > > > > > 2|."1 tab3 > > > > > > ┌─┬─┬─┬─┐ > > > > > > │0│1│0│2│ > > > > > > ├─┼─┼─┼─┤ > > > > > > │3│4│0│5│ > > > > > > ├─┼─┼─┼─┤ > > > > > > │6│7│0│8│ > > > > > > └─┴─┴─┴─┘ > > > > > > > > > Can you suggest me a better solution ? > > > > > > Thanks > > > > > > Paolo > > > -------------------------------------------------------------------- > > > -- For information about J forums see > > > http://www.jsoftware.com/forums.htm > > ---------------------------------------------------------------------- > > For information about J forums see http://www.jsoftware.com/forums.htm > > > > -- > Sent from Gmail Mobile > ---------------------------------------------------------------------- > For information about J forums see http://www.jsoftware.com/forums.htm > > ---------------------------------------------------------------------- > For information about J forums see http://www.jsoftware.com/forums.htm > -- We are made of star dust (Carl Sagan) ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
