R help - Oct 2009 - How do I reverse the digits of a number

Hi All,

Thanks for your help.  I need to reverse the digits of a number (unknown
lenght).  Example 1234->4321

Tom
-- 
View this message in context:
http://www.nabble.com/How-do-I-reverse-the-digits-of-a-number-tp25838410p25838410.html
Sent from the R help mailing list archive at Nabble.com.

tom_p wrote:
> 
> Hi All,
> 
> Thanks for your help.  I need to reverse the digits of a number (unknown
> lenght).  Example 1234->4321
> 
> Tom
> 
> z <- 4321
>
as.numeric(paste(rev(strsplit(as.character(z),"")[[1]]),collapse=""))
[1] 1234

-- 
View this message in context:
http://www.nabble.com/How-do-I-reverse-the-digits-of-a-number-tp25838410p25840085.html
Sent from the R help mailing list archive at Nabble.com.

Try this:
> library(tcltk)
> as.numeric(tcl("string", "reverse", 123))
[1] 321


On Sat, Oct 10, 2009 at 5:37 PM, tom_p <t.pitt at hotmail.com>
wrote:
>
> Hi All,
>
> Thanks for your help. ?I need to reverse the digits of a number (unknown
> lenght). ?Example 1234->4321
>
> Tom
> --
> View this message in context:
http://www.nabble.com/How-do-I-reverse-the-digits-of-a-number-tp25838410p25838410.html
> Sent from the R help mailing list archive at Nabble.com.
>
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>