An alternative that works for any base (other than 10) is the following: > library(sfsmisc) > digitsBase(1001, 10) Class 'basedInt'(base = 10) [1:1] [,1] [1,] 1 [2,] 0 [3,] 0 [4,] 1
-Christos > -----Original Message----- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] On Behalf Of Gustavo Carvalho > Sent: Tuesday, December 09, 2008 12:49 PM > To: r-help@r-project.org > Subject: [R] extract the digits of a number > > Hello, > > Anyone knows how can I do this in a cleaner way? > > mynumber = 1001 > as.numeric(unlist(strsplit(as.character(mynumber),""))) > [1] 1 0 0 1 > > Thanks in advance, > > Gustavo > > ______________________________________________ > R-help@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. > > ______________________________________________ R-help@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.