On Thu, Sep 8, 2011 at 2:57 PM, Raul Miller <[email protected]> wrote:
> On Thu, Sep 8, 2011 at 2:41 PM, Marshall Lochbaum <[email protected]>
> wrote:
>> The forward transform can be implemented as:
>>
>> bwt =: (/: 1&|.)@:(,&EAV)
>
> bwt=: (/: 1&|.)@:(,&EAV)
> bwt0=:{:"1@/:~@(|."0 1~ i.@-@#)@(,&EAV)
> (bwt -: bwt0) 'aba'
> 0
> bwt 'aba'
> b�aa
> bwt0 'aba'
> �baa
Or, for a more meaningful illustration of this issue:
ibwt=: [: }.@(|.~ i.&(255{a.))@{. (,. /:~)^:(#@] - 1:)~
ibwt bwt 'abad'
abab
ibwt bwt0 'abad'
abad
--
Raul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
