Actually I think the shortest is still 43
|:1j1#(25{.(u:,2#65 97+/i.26)(>:@i.}.[)])"0 's'
t u v w x y z a b c d e f g h i j k l m n o p q r
|:1j1#(25{.(u:,2#65 97+/i.26)(>:@i.}.[)])"0 's.'
t
u
v
w
x
y
z
a
b
c
d
e
f
g
h
i
j
k
l
m
n
o
p
q
r
|:1j1#(25{.(u:,2#65 97+/i.26)(>:@i.}.[)])"0 '['
#'|:1j1#(25{.(u:,2#65 97+/i.26)(>:@i.}.[)])"0'
43
Cheers, bob
On 2012-08-30, at 7:41 AM, R.E. Boss wrote:
> Lose 1 char by replacing 98-33^96>3&u: by 64+33^'`'I.]
>
> |:1j1#}.@((i.~|.e.#])26{.a.}.~64+33^'`'I.])"0'S'
> T U V W X Y Z A B C D E F G H I J K L M N O P Q R
>
> Is this, together with Millers solution, the shortest with 45 characters?
>
> #'1j1#"1&|:(25{.]}.~1+i.~)&(u:,2#65 97+/i.26)"0'
> 45
>
> The latter can be shortened 1 char by
> 1j1#"1&|:(u:,2#65 97+/i.26)&(25{.]}.~1+i.)"0
>
>
> R.E. Boss
>
>
>> -----Oorspronkelijk bericht-----
>> Van: programming-boun...@forums.jsoftware.com
>> [mailto:programming-boun...@forums.jsoftware.com] Namens Robert Cyr
>> Verzonden: donderdag 30 augustus 2012 8:10
>> Aan: programm...@jsoftware.com
>> Onderwerp: Re: [Jprogramming] Print Custom Alphabet
>>
>>
>> So another correction is needed, and the line is now 3 characters too long.
>>
>> |:1j1#}.@((i.~|.e.#])26{.a.}.~98-33^96>3&u:)"0 's.'
>>
>> I need the 26 character of the alphabet. I therefore remove my excess
>> character after rotation only.
>>
>> Many thanks.
>>
>> Robert Cyr
>>
>
>
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
