Ric, How can I rep'ace &. In your portion of the code that dets the ages?
An inverse of ([:”.>).
A=:'1809';'Philip St. George Cooke';'1895'
B=:'1836';'Flora Cooke Stuart';'1923'
C=:'1833';'Jeb Stuart';'1864'
D=:'1834';'Jacob Sharpe';'1892'
[E=:A,B,C,:D
f5=:({:-&.([:".>) {.)"1
f5 E
┌──┬──┬──┬──┐
│86│87│31│58│
└──┴──┴──┴──┘
NB. u&.v y ↔ vi u v y
NB. Inverse vi (([:".>)^:_1)
g5=:({:(([:".>)^:_1)-([:".>) {.)"1
g5 E
|domain error: g5
| g5 E
Linda
-----Original Message-----
From: Programming [mailto:[email protected]] On Behalf
Of Linda A Alvord
Sent: Thursday, June 30, 2016 1:34 AM
To: [email protected]
Subject: Re: [Jprogramming] How many years did each person live?
Ric, I guess it is like most issues. You don't realize that you don't like how
you did something until you try to do something else with it and you wish you
had built it another way. Until I want to take another step with this
collection of data I guess I don't care. Sorry could come later. That's part
of the fun of using J. You can knock down all the building blocks and start
over. Linda
-----Original Message-----
From: Programming [ <mailto:[email protected]>
mailto:[email protected]] On Behalf Of Ric Sherlock
Sent: Wednesday, June 29, 2016 11:53 PM
To: Programming JForum
Subject: Re: [Jprogramming] How many years did each person live?
Hi Linda,
Your original spec didn't include whether you wanted the answer to be numeric
or character. Since the input data was character I decided to keep everything
consistent. It is certainly simpler to leave it as numeric.
Joe's approach of making each column a vector has a lot of benefits.
Depending on how much processing you want to do.
On Thu, Jun 30, 2016 at 2:09 PM, Linda A Alvord <
<mailto:[email protected]> [email protected]>
wrote:
> RRic, Your solution is quite a bit simpler than mine! All data is
> characters. Linda
>
>
> -----Original Message-----
> From: Programming [ <mailto:[email protected]>
> mailto:[email protected]] On
> Behalf Of Ric Sherlock
> Sent: Tuesday, June 28, 2016 9:41 PM
> To: Programming JForum
> Subject: Re: [Jprogramming] How many years did each person live?
>
> Here is a reasonably concise one but I suspect not your preferred version
> f1=: (, {: -&.(" <mailto:.@%3e)%20%7b.)> .@>) {.)"1
> f1 E
> ┌────┬───────────────────────┬────┬─────┐
>
> │1809│Philip St. George Cooke│1895│86 │
>
> ├────┼───────────────────────┼────┼─────┤
>
> │1836│Flora Cooke Stuart │1923│87 │
>
> ├────┼───────────────────────┼────┼─────┤
>
> │1833│Jeb Stuart │1864│31 │
>
> ├────┼───────────────────────┼────┼─────┤
>
> │1834│Jacob Sharpe │189 │_1645│
>
> └────┴───────────────────────┴────┴─────┘
>
>
> Here is a simpler explicit one.
> f2=: 3 :'y ,. 8!:0 -/"1 (_99) ". > 2 0 {"1 y'
>
>
> On Wed, Jun 29, 2016 at 12:45 PM, Linda A Alvord
> < <mailto:[email protected]> [email protected]>
> wrote:
>
> > Nowdefine a verb to add a 4th column of the life span of each person.
> >
> >
> >
> > A=:'1809';'Philip St. George Cooke';'1895'
> >
> > B=:'1836';'Flora Cooke Stuart';'1923'
> >
> > C=:'1833';'Jeb Stuart';'1864'
> >
> > D=:'1834';'Jacob Sharpe';'189'
> >
> > [E=:A,B,C,:D
> >
> > -----T-----------------------T----┐
> > │1809│Philip St. George Cooke│1895│
> > +----+-----------------------+----+
> > │1836│Flora Cooke Stuart │1923│
> > +----+-----------------------+----+
> > │1833│Jeb Stuart │1864│
> > +----+-----------------------+----+
> > │1834│Jacob Sharpe │189 │
> > L----+-----------------------+-----
> >
> >
> >
> > Linda
> >
> >
> >
> > --------------------------------------------------------------------
> > -- For information about J forums see
> > <http://www.jsoftware.com/forums.htm> http://www.jsoftware.com/forums.htm
> ----------------------------------------------------------------------
> For information about J forums see <http://www.jsoftware.com/forums.htm>
> http://www.jsoftware.com/forums.htm
> ----------------------------------------------------------------------
> For information about J forums see <http://www.jsoftware.com/forums.htm>
> http://www.jsoftware.com/forums.htm
>
----------------------------------------------------------------------
For information about J forums see <http://www.jsoftware.com/forums.htm>
http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see <http://www.jsoftware.com/forums.htm>
http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
