How about an alternative:


**|install.packages("sos", repos="http://R-Forge.R-project.org")|**
library(sos)


(x <- back2ForwardSlash())
\002 \001 \102


(xs <- strsplit(x, '/')[[1]][-1])

nch <- nchar(xs)
while(any((nch2 <- nchar(xs <- gsub('^0', '', xs)))<nch))nch <- nch2
xs


       I liked your deparse solution;  this provides an alternative.


       Hope this helps.
       Spencer


On 6/8/2012 12:06 PM, Ben quant wrote:
> Yes, I've been messing with that. I've also been using the hexView package.
> Reading as characters first is just helping me figure out the structure of
> this binary file. In this situation it really helped. For example:
>     È \001 \002
>   200    1    2
>
> This probably isn't how I'll do it in my final draft.
>
> I'm now looking for a date or series of dates in the binary file... I'm
> guessing the dates will be represented as 3 integers one for month, day,
> and year.  Any help on strategy help here would be great...  I'm reading a
> file with a dbs extension if that helps.
>
> Thanks!
>
> ben
>
> On Fri, Jun 8, 2012 at 12:44 PM, William Dunlap<wdunlap@tibco.com>  wrote:
>
>>   When reading binary files, it is usually best to use readBin's****
>>
>> what=, size=, signed=, and endian= arguments to get what you want.****
>>
>> Reading as characters and then converting them as you are doing****
>>
>> is a very hard way to do things (and this particular conversion doesn't***
>> *
>>
>> make much sense).****
>>
>> ** **
>>
>> Bill Dunlap****
>>
>> Spotfire, TIBCO Software****
>>
>> wdunlap tibco.com****
>>
>> ** **
>>
>> *From:* Ben quant [mailto:ccquant@gmail.com]
>> *Sent:* Friday, June 08, 2012 11:40 AM
>> *To:* William Dunlap
>>
>> *Cc:*r-help@r-project.org
>> *Subject:* Re: [R] remove leading slash****
>>
>>   ** **
>>
>> Okay, Bill smelt something wrong, so I must revise.
>>
>> This works for large numbers:
>>
>> prds = sapply(sapply(cnt_str,charToRaw),as.integer)
>>
>> PS - this also solves an issue I've been having elsewhere...
>> PPS- Bill - I'm reading binary files...and learning.
>>
>> thanks!
>> ben
>>
>> ****
>>
>> On Fri, Jun 8, 2012 at 12:16 PM, William Dunlap<wdunlap@tibco.com>  wrote:
>> ****
>>
>> Can you tell us why you are interested in this mapping?
>> I.e., how did the "\001" and "\102" arise and why do you
>> want to convert them to the integers 1 and 102?
>>
>> Bill Dunlap
>> Spotfire, TIBCO Software
>> wdunlap tibco.com****
>>
>>
>>
>>> -----Original Message-----
>>> From:r-help-bounces@r-project.org  [mailto:r-help-bounces@r-project.org]
>> On Behalf
>>> Of Ben quant
>>> Sent: Friday, June 08, 2012 11:00 AM
>>> To: Duncan Murdoch
>>> Cc:r-help@r-project.org
>>> Subject: Re: [R] remove leading slash
>>>
>>> Thanks for all your help.  I did it this way:
>>>
>>>> x = sapply(cnt_str,deparse)
>>>> x
>>>         \002        \001        \002
>>> "\"\\002\"" "\"\\001\"" "\"\\102\""
>>>> as.numeric(substr(x,3,5))
>>> [1]   2   1 102
>>>
>>> ...which is a bit of a hack, but gets me where I want to go.
>>>
>>> Thanks,
>>> Ben
>>>
>>> On Fri, Jun 8, 2012 at 11:56 AM, Duncan Murdoch<
>> murdoch.duncan@gmail.com>wrote:
>>>> On 08/06/2012 1:50 PM, Peter Langfelder wrote:
>>>>
>>>>> On Fri, Jun 8, 2012 at 10:25 AM, David****
>>> Winsemius<dwinsemius@comcast.**net<dwinsemius@comcast.net>>****
>>>>>   wrote:
>>>>>>   On Jun 8, 2012, at 1:11 PM, Ben quant wrote:
>>>>>>
>>>>>>>   Hello,
>>>>>>>
>>>>>>>   How do I change this:
>>>>>>>>   cnt_str
>>>>>>>   [1] "\002" "\001" "\102"
>>>>>>>
>>>>>>>   ...to this:
>>>>>>>>   cnt_str
>>>>>>>   [1] "2" "1" "102"
>>>>>>>
>>>>>>>   Having trouble because of this:
>>>>>>>>   nchar(cnt_str[1])
>>>>>>>   [1] 1
>>>>>>   "\001" is ASCII cntrl-A, a single character.
>>>>>>
>>>>>>   ?Quotes   # not the first, second or third place I looked but I
>> knew I
>>>>> had
>>>>>>   seen it before.
>>>>> If you still want to obtain the actual codes, you will be able to get
>>>>> the number using utf8ToInt from package base or AsciiToInt from
>>>>> package sfsmisc. By default, the integer codes will be printed in base
>>>>> 10, though.
>>>>>
>>>> You could use
>>>> ****
>>>>> as.octmode(as.integer(**charToRaw("\102")))****
>>>> [1] "102"
>>>>
>>>> if you really want the octal versions.  Doesn't work so well on "\1022"
>>>> though (because that's two characters long).
>>>>
>>>> Duncan Murdoch
>>>>
>>>>
>>>>> A roundabout way, assuming your are on a *nix system, would be to
>>>>> dump() cnt_str into a file, say tmp.txt, then run in a shell (or using
>>>>> system() ) something like
>>>>>
>>>>> sed --in-place 's/\\//g' tmp.txt
>>>>>
>>>>> to remove the slashes, then use
>>>>>
>>>>> cnt_str_new = read.table("tmp.txt")
>>>>>
>>>>> in R to get the codes back in. I'll let you iron out the details.
>>>>>
>>>>> Peter
>>>>> ****
>>>>> ______________________________**________________
>>>>> R-help@r-project.org  mailing list
>>>>> https://stat.ethz.ch/mailman/**listinfo/r-
>>> help<https://stat.ethz.ch/mailman/listinfo/r-help>
>>>>> PLEASE do read the posting guidehttp://www.R-project.org/**
>>>>> posting-guide.html<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<
>> https://stat.ethz.ch/mailman/listinfo/r-
>>> help>
>>>> PLEASE do read the posting guidehttp://www.R-project.org/**
>>>> posting-guide.html<http://www.R-project.org/posting-guide.html>****
>>>> and provide commented, minimal, self-contained, reproducible code.
>>>>
>>> ****
>>>        [[alternative HTML version deleted]]****
>>> ______________________________________________
>>> 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.****
>> ** **
>>
> 	[[alternative HTML version deleted]]
>
>
>
> ______________________________________________
> R-help@r-project.org  mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guidehttp://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.


-- 
Spencer Graves, PE, PhD
President and Chief Technology Officer
Structure Inspection and Monitoring, Inc.
751 Emerson Ct.
San José, CA 95126
ph:  408-655-4567
web:www.structuremonitoring.com


-- 
Spencer Graves, PE, PhD
President and Chief Technology Officer
Structure Inspection and Monitoring, Inc.
751 Emerson Ct.
San José, CA 95126
ph:  408-655-4567
web:  www.structuremonitoring.com


	[[alternative HTML version deleted]]

