This is what I wanted to send. --Kip Murray
NB. A way to do column operations
NB. rop below makes row 2 become cumulative total of row 1
rop =: (2 {. ]),([: +/\ 1 { ]), 3 }. ]
NB. cop below makes col 2 become cumulative total of col 1
cop =: rop&.|:
NB. Example
]sheet =: i. 5 4
0 1 2 3
4 5 6 7
8 9 10 11
12 13 14 15
16 17 18 19
rop sheet
0 1 2 3
4 5 6 7
4 9 15 22
12 13 14 15
16 17 18 19
cop sheet
0 1 1 3
4 5 6 7
8 9 15 11
12 13 28 15
16 17 45 19
On Tue, Oct 6, 2015 at 6:08 PM Kip Murray <[email protected]> wrote:
> Apologies for the mess below -- ill-behaving mailer! --Kip Murray
>
> On Tue, Oct 6, 2015 at 6:05 PM Kip Murray <[email protected]> wrote:
>
>> <div style="color: rgb(0, 0, 0); font-family: 'Courier New'; font-size:
>> 18px; font-style: normal; font-variant: normal; font-weight: normal;
>> letter-spacing: normal; orphans: auto; text-align: left; text-indent: 0px;
>> text-transform: none; white-space: normal; widows: auto; word-spacing: 0px;
>> -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> NB. A
>> way to do column operations</div><div style="color: rgb(0, 0, 0);
>> font-family: 'Courier New'; font-size: 18px; font-style: normal;
>> font-variant: normal; font-weight: normal; letter-spacing: normal; orphans:
>> auto; text-align: left; text-indent: 0px; text-transform: none;
>> white-space: normal; widows: auto; word-spacing: 0px;
>> -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;">
>> </div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> NB. rop
>> below makes row 2 become cumulative total of row 1</div><div style="color:
>> rgb(0, 0, 0); font-family: 'Courier New'; font-size: 18px; font-style:
>> normal; font-variant: normal; font-weight: normal; letter-spacing: normal;
>> orphans: auto; text-align: left; text-indent: 0px; text-transform: none;
>> white-space: normal; widows: auto; word-spacing: 0px;
>> -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;">
>> </div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> rop =:
>> (2 {. ]),([: +/\ 1 { ]), 3 }. ]</div><div style="color: rgb(0, 0, 0);
>> font-family: 'Courier New'; font-size: 18px; font-style: normal;
>> font-variant: normal; font-weight: normal; letter-spacing: normal; orphans:
>> auto; text-align: left; text-indent: 0px; text-transform: none;
>> white-space: normal; widows: auto; word-spacing: 0px;
>> -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;">
>> </div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> NB. cop
>> below makes col 2 become cumulative total of col 1</div><div style="color:
>> rgb(0, 0, 0); font-family: 'Courier New'; font-size: 18px; font-style:
>> normal; font-variant: normal; font-weight: normal; letter-spacing: normal;
>> orphans: auto; text-align: left; text-indent: 0px; text-transform: none;
>> white-space: normal; widows: auto; word-spacing: 0px;
>> -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;">
>> </div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> cop =:
>> rop&.|:</div><div style="color: rgb(0, 0, 0); font-family: 'Courier
>> New'; font-size: 18px; font-style: normal; font-variant: normal;
>> font-weight: normal; letter-spacing: normal; orphans: auto; text-align:
>> left; text-indent: 0px; text-transform: none; white-space: normal; widows:
>> auto; word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26,
>> 0.301961); -webkit-text-size-adjust: none; -webkit-text-stroke-width:
>> 0px;"> </div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> NB.
>> Example</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;">
>> </div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> ]sheet
>> =: i. 5 4</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> 0 1 2
>> 3</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> 4 5 6
>> 7</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> 8 9 10
>> 11</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;">12 13 14
>> 15</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;">16 17 18
>> 19</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;">
>> </div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> rop
>> sheet</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> 0 1 2
>> 3</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> 4 5 6
>> 7</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> 4 9 15
>> 22</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;">12 13 14
>> 15</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;">16 17 18
>> 19</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;">
>> </div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> cop
>> sheet</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> 0 1 1
>> 3</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> 4 5 6
>> 7</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;"> 8 9 15
>> 11</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;">12 13 28
>> 15</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;">16 17 45
>> 19</div><div style="color: rgb(0, 0, 0); font-family: 'Courier New';
>> font-size: 18px; font-style: normal; font-variant: normal; font-weight:
>> normal; letter-spacing: normal; orphans: auto; text-align: left;
>> text-indent: 0px; text-transform: none; white-space: normal; widows: auto;
>> word-spacing: 0px; -webkit-tap-highlight-color: rgba(26, 26, 26, 0.301961);
>> -webkit-text-size-adjust: none; -webkit-text-stroke-width: 0px;">
>> </div><br class="Apple-interchange-newline">
>>
>> On Tue, Oct 6, 2015 at 5:55 PM John Baker <[email protected]> wrote:
>>
>>> Not at all. I often transpose but in this case the table has less than
>>> 1000 rows so it's not a large amount of data.
>>>
>>>
>>> Sent from my iPhone
>>>
>>> > On Oct 6, 2015, at 5:14 PM, Raul Miller <[email protected]> wrote:
>>> >
>>> > Rather than using a rank 1 operation, I'd prefer to use a
>>> > column-at-a-time approach (in other words: transpose the table before
>>> > working on it).
>>> >
>>> > I think that performance should be better, and the expressions are
>>> > easier (in my opinion) to create.
>>> >
>>> > Ndx=: 3 :0"0
>>> > {. y&{::`''
>>> > )
>>> >
>>> > ColNdxs=: 3 :0
>>> > #('`',y)=: Ndx i.#;:y
>>> > )
>>> >
>>> > ColNdxs 'A B C D E F G H I J K L M N O P Q'
>>> > 17
>>> >
>>> > (((A * B) + C) - ((F - G) * (Q + B))) |:i.5 17
>>> > 19 376 1311 2824 4915
>>> >
>>> > Does this approach create problems for you?
>>> >
>>> > Thanks,
>>> >
>>> > --
>>> > Raul
>>> >
>>> >
>>> >> On Tue, Oct 6, 2015 at 2:16 PM, John Baker <[email protected]>
>>> wrote:
>>> >> The other day I was converting spreadsheet formulas that applied
>>> between
>>> >> columns to J operations on numeric tables.
>>> >>
>>> >> One such formula was:
>>> >>
>>> >> ((I - E) + R) - D
>>> >>
>>> >> Where the verbs -,+ work on columns. To convert this to a simple J
>>> >> expression you can "Iversonize".
>>> >>
>>> >> D -~ R + E -~ I
>>> >>
>>> >> which leads directly to the nice little verb (cops):
>>> >>
>>> >> cops=: -~`+`(-~)`:3"1
>>> >>
>>> >> That will do all the operations on each row in one swoop.
>>> >>
>>> >> The question arises. Given an arbitrary parenthesized formula with
>>> only
>>> >> dyadic verbs as text:
>>> >>
>>> >> '((A * B) + C) - ((F - G) * (Q + B))'
>>> >>
>>> >> Return the Iversonized gerund expression and the column permutation
>>> needed
>>> >> to get an expression like (cops).
>>> >>
>>> >> I've been doing this by hand but if anyone cares to dig into this and
>>> crank
>>> >> out a solution if would help many of us that are punished by
>>> spreadsheets.
>>> >>
>>> >> --
>>> >> John D. Baker
>>> >> [email protected]
>>> >> ----------------------------------------------------------------------
>>> >> 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
