[Jprogramming] Progressive insertion into a string

[Hauke Rehr]

doesn’t all that boxing/unboxing and cutting/gluing hurt?
maybe I have to stop thinking about improvements that
actually aren’t improvements.

Nice readable approach!

Am 04.02.21 um 09:51 schrieb 'Pascal Jasmin' via Programming:
> assuming you want all dedoubled on a pass and not just first match,
> 
> 
> 
> ;@:(_2&(,`([,'X',])@.=/each@<\))^:_ 'THEEQUICKBROWFFOOOX'
> 
> THEXEQUICKBROWFXFOXOXOX
> 
> 
> ;@:(_2&(,`([,'X',])@.=/each@<\)) 'THEEQUICKBROWFFOOOX'
> 
> THEXEQUICKBROWFFOOXOX
> 
> 
> 
> 
> On Wednesday, February 3, 2021, 11:02:49 p.m. EST, Ric Sherlock <tikkanz at gmail.com> wrote: 
> 
> 
> 
> 
> 
> I need to separate any digraphs in a string, that consist of 2 letters the
> same, by inserting an 'X' between them.
>   _2 ]\ 'THEEQUICKBROWFFOX'
> TH
> EE
> QU
> IC
> KB
> RO
> WF
> FO
> X
> 
> 'EE' is a digraph that needs an 'X' inserted. Doing so will result in:
> 
> TH
> EX
> EQ
> UI
> CK
> BR
> OW
> FF
> OX
> 
> So now we also need to separate the 'FF' digraph.
> 
> I want to define a verb "dedouble" that will process a string so:
>   dedouble 'THEEQUICKBROWFFOX'
> THEXEQUICKBROWFXFOX
> But:
>   dedouble 'THEEQUICKBROWFOOX'
> THEXEQUICKBROWFOOX
> 
> I have implemented a solution at
> https://rosettacode.org/wiki/Playfair_cipher#J but am interested in
> alternative implementations.
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
> 

-- 
----------------------
mail written using NEO
neo-layout.org