This is another place where
(#x)}:y
would be useful.
Devon McCormick wrote:
Henry -
I'd support Roger's intuition on this one: inserting separators between
items and
unboxing them seems like two distinct operations. It doesn't fit
neatly as
the obverse
of boxing because it requires added information.
I have long had a simple utility to do this in a slightly more general
fashion than you
require:
punclist=: 3 : 0
NB.* punclist: punctuate boxed list y with character(s) x between each
item.
', ' punclist y
:
(-#x)}.;(":&.>y),&.><x
)
'-' punclist 'a';'bc';'def'
a-bc-def
punclist 'a';'bc';'def'
a, bc, def
As you might surmise from the default case, I most commonly use this to
format
a vector of words into a comma-separated list.
Devon
On 6/14/07, Henry Rich <[EMAIL PROTECTED]> wrote:
I often have boxed data like
'a';'bc';'def'
that I want to run together with delimiters, for example
a-bc-def
I admit this is not such a challenge; my best solution is
}:@;@:(,&'-'&.>) 'a';'bc';'def'
But I don't like the way it looks; especially I don't like
that }: is really the obverse of (,&'-') but that fact does not
appear (and I don't want to add yet more code by replacing }:
with ,&'-'^:_1 ).
We have a function that runs boxes together: ;:^:_1 . Why
not let it take a Fit that gives the delimiter
(' ' by default)? Then I would write
;:^:_1!.'-' 'a';'bc';'def'
Much more elegant, I say.
Henry Rich
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
