Also note that one can use toupper in place of as.character in which case no other changes are required.
On Sun, May 17, 2009 at 5:07 PM, Ted Harding <ted.hard...@manchester.ac.uk> wrote: > Thanks, Jim. While that is still in hex, I find I can get the binary > represntation using Gabor's gsubfn() function, provided the A-F isw > changed to a-f in setting up his 'binary.digits', and the output is > explicitly cast to character: > > gsubfn("[0-9a-f]", binary.digits, > as.character(writeBin(pi,raw(),endian='big') > > Ted. > > On 17-May-09 20:04:58, jim holtman wrote: >> Are you looking for how the floating point is represented in the >> IEEE-754 >> format? If so, you can use writeBin: >> >>> writeBin(pi,raw(),endian='big') >> [1] 40 09 21 fb 54 44 2d 18 >> >> >> On Sun, May 17, 2009 at 1:23 PM, Ted Harding >> <ted.hard...@manchester.ac.uk>wrote: >> >>> I am interested in studying the binary representation of numerics >>> (doubles) in R, so am looking for possibilities of output of the >>> internal binary representations. sprintf() with format "a" or "A" >>> is halfway there: >>> >>> sprintf("%A",pi) >>> # [1] "0X1.921FB54442D18P+1" >>> >>> but it is in hex. >>> >>> The following illustrate the sort of thing I want: >>> >>> 1.1001 0010 0001 1111 1011 0101 0100 0100 0100 0010 1101 0001 1000 >>> times 2 >>> >>> 11.0010 0100 0011 1111 0110 1010 1000 1000 1000 0101 1010 0011 000 >>> >>> 0.1100 1001 0000 1111 1101 1010 1010 0010 0010 0001 0110 1000 1100 0 >>> times 4 >>> >>> (without the spaces -- only put in above for clarity). >>> >>> While I could take the original output "0X1.921FB54442D18P+1" from >>> sprintf() and parse it out into binary using gsub() or the like, >>> of submit it to say an 'awk' script via an external file, this would >>> be a tedious business! >>> >>> Is there some function already in R which outputs the bits in the >>> binary representation directly? >>> >>> I see that Dabid Hinds asked a similar question on 17 Aug 2005: >>> "Raw data type transformations" >>> >>> http://finzi.psych.upenn.edu/R/Rhelp02/archive/59900.html >>> >>> (without, apparently, getting any response -- at any rate within >>> the following 3 months). >>> >>> With thanks for any suggestions, >>> Ted. >>> >>> -------------------------------------------------------------------- >>> E-Mail: (Ted Harding) <ted.hard...@manchester.ac.uk> >>> Fax-to-email: +44 (0)870 094 0861 >>> Date: 17-May-09 Time: 18:23:49 >>> ------------------------------ XFMail ------------------------------ >>> >>> ______________________________________________ >>> 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<http://www.r-project.org/po >>> sting-guide.html> >>> and provide commented, minimal, self-contained, reproducible code. >>> >> >> >> >> -- >> Jim Holtman >> Cincinnati, OH >> +1 513 646 9390 >> >> What is the problem that you are trying to solve? > > -------------------------------------------------------------------- > E-Mail: (Ted Harding) <ted.hard...@manchester.ac.uk> > Fax-to-email: +44 (0)870 094 0861 > Date: 17-May-09 Time: 22:06:59 > ------------------------------ XFMail ------------------------------ > > ______________________________________________ > 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.