Re: Mathematica digit handling query

From: Peter Pein (petsie_at_arcor.de)
Date: 11/12/04 

Date: Fri, 12 Nov 2004 07:20:35 +0100

Tony King wrote:
> Does anyone know of any easy way to make mathematica reverse the digits in a
> list of numbers. For example, suppose that I used
>
>
>
> Table[n^3,{n,1,5}] to generate {1, 8, 27, 64, 125}
>
>
>
> Then I need to be able to operate on this list to return
>
>
>
> {1,8,72,46,521}
>
>
>
> Any pointers would be gratefully accepted
>
>
>
> Thanks
>
>
>
> Tony
>
>
In[1]:=
   rev[n_Integer] := FromDigits[Reverse[IntegerDigits[n]]];
In[2]:=
   rev /@ (Range[5]^3)
Out[2]=
   {1, 8, 72, 46, 521} 

-- 
Peter Pein
Berlin