[Rd] R freezes with text(...., srt = -1e-8) (PR#9347)
Full_Name: Emmanuel Paradis Version: 2.4.0 OS: Linux Submission from: (NULL) (193.49.41.124) Adding text to a plot makes R freeze if 'srt' is given a very small negative value, eg: plot(1, type = "n") text(1, 1, "some text", srt = -1e-8) But if 'srt = -1e-6' (or smaller) or 'srt = -1e-19' (or greater), this works. This seems to be OS-dependent: I observed this under Linux but not under Solaris (I was not able to test under Windows or MacOS). EP __ R-devel@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-devel
[Rd] read.fwf doesn't work with header = TRUE (PR#8226)
Full_Name: Emmanuel Paradis
Version: 2.1.1
OS: Linux
Submission from: (NULL) (193.49.41.105)
read.fwf(..., header = TRUE) does not work properly since:
1/ the original header is printed on the console and not in FILE;
2/ the different 'parts' of the header should be separated with tabs
to work with the call to read.table.
Here is a suggested fix for src/library/utils/R/read.fwf.R:
38c38,40
< cat(FILE, headerline, "\n")
---
> headerline <- unlist(strsplit(headerline, " {1,}"))
> headerline <- paste(headerline, collapse = "\t")
> cat(file = FILE, headerline, "\n")
PS: my R is not updated by read.fwf.R does not seem to have been changed in R
2.2.0.
__
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
Re: [Rd] read.fwf doesn't work with header = TRUE (PR#8226)
Prof Brian Ripley wrote:
> On Thu, 20 Oct 2005 [EMAIL PROTECTED] wrote:
>
>> Full_Name: Emmanuel Paradis
>> Version: 2.1.1
>> OS: Linux
>> Submission from: (NULL) (193.49.41.105)
>>
>>
>> read.fwf(..., header = TRUE) does not work properly since:
>>
>> 1/ the original header is printed on the console and not in FILE;
>> 2/ the different 'parts' of the header should be separated with tabs
>> to work with the call to read.table.
>>
>> Here is a suggested fix for src/library/utils/R/read.fwf.R:
>>
>> 38c38,40
>> < cat(FILE, headerline, "\n")
>> ---
>>
>>> headerline <- unlist(strsplit(headerline, " {1,}"))
>>> headerline <- paste(headerline, collapse = "\t")
>>> cat(file = FILE, headerline, "\n")
>
>
> Thanks, but I don't think that is right. It assumes the header line is
> space-delimited (or at least that spaces get converted to tabs). We
> have not specified the format of the header line, and it cannot usefully
> be fixed format. So I think we need to specify it is delimited by 'sep'
> (not tab).
I see, but suppose we read selectively some columns in a file, eg with
widths=c(1, -4, 2), how can we know how many variables have been skipped
and then select the appropriate names in the header line?
Here is another proposed fix, but this assumes the header line is in
fixed-width format (as specified by 'widths'):
38c38,41
< cat(FILE, headerline, "\n")
---
> head.last <- cumsum(widths)
> head.first <- head.last - widths + 1
> headerline <- substring(headerline, head.first, head.last)[drop]
> cat(file = FILE, headerline, "\n", sep = sep)
?read.fwf says clearly that sep is used internally.
__
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
Re: [Rd] read.fwf doesn't work with header = TRUE (PR#8226)
Prof Brian Ripley wrote:
> On Fri, 21 Oct 2005, Emmanuel Paradis wrote:
>
>> Prof Brian Ripley wrote:
>>
>>> On Thu, 20 Oct 2005 [EMAIL PROTECTED] wrote:
>>>
>>>> Full_Name: Emmanuel Paradis
>>>> Version: 2.1.1
>>>> OS: Linux
>>>> Submission from: (NULL) (193.49.41.105)
>>>>
>>>>
>>>> read.fwf(..., header = TRUE) does not work properly since:
>>>>
>>>> 1/ the original header is printed on the console and not in FILE;
>>>> 2/ the different 'parts' of the header should be separated with tabs
>>>> to work with the call to read.table.
>>>>
>>>> Here is a suggested fix for src/library/utils/R/read.fwf.R:
>>>>
>>>> 38c38,40
>>>> < cat(FILE, headerline, "\n")
>>>> ---
>>>>
>>>>> headerline <- unlist(strsplit(headerline, " {1,}"))
>>>>> headerline <- paste(headerline, collapse = "\t")
>>>>> cat(file = FILE, headerline, "\n")
>>>
>>>
>>>
>>> Thanks, but I don't think that is right. It assumes the header line
>>> is space-delimited (or at least that spaces get converted to tabs).
>>> We have not specified the format of the header line, and it cannot
>>> usefully be fixed format. So I think we need to specify it is
>>> delimited by 'sep'
>>> (not tab).
>>
>>
>> I see, but suppose we read selectively some columns in a file, eg with
>> widths=c(1, -4, 2), how can we know how many variables have been
>> skipped and then select the appropriate names in the header line?
>
>
> You do not: as the help file says
>
> Negative-width fields are used to indicate columns to be skipped,
> eg '-5' to skip 5 columns. These fields are not seen by
> 'read.table' and so should not be included in a 'col.names' or
> 'colClasses' argument.
OK, but it is strange to me to not have all variables named in a header
line.
>> Here is another proposed fix, but this assumes the header line is in
>> fixed-width format (as specified by 'widths'):
>
>
> What happens if there are multi-line records? Your `fix' crashes.
It crashes anyway because it should be [!drop] and not [drop] ;)
>> 38c38,41
>> < cat(FILE, headerline, "\n")
>> ---
>>
>>> head.last <- cumsum(widths)
>>> head.first <- head.last - widths + 1
>>> headerline <- substring(headerline, head.first, head.last)[drop]
>>> cat(file = FILE, headerline, "\n", sep = sep)
>>
>>
>> ?read.fwf says clearly that sep is used internally.
>
>
> Not so: please check the current version.
Here is what I have in R 2.2.0:
sep: character; the separator used internally; should be a
character that does not occur in the file.
So, should the fix be simply:
38c38
< cat(FILE, headerline, "\n")
---
> cat(file = FILE, headerline, "\n")
?
__
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
Re: [Rd] R freezes with text(...., srt = -1e-8) (PR#9347)
Duncan Murdoch wrote: > On 11/7/2006 5:35 AM, [EMAIL PROTECTED] wrote: > >> Full_Name: Emmanuel Paradis >> Version: 2.4.0 >> OS: Linux >> Submission from: (NULL) (193.49.41.124) >> >> >> Adding text to a plot makes R freeze if 'srt' is given a very small >> negative >> value, eg: >> >> plot(1, type = "n") >> text(1, 1, "some text", srt = -1e-8) >> >> But if 'srt = -1e-6' (or smaller) or 'srt = -1e-19' (or greater), this >> works. >> >> This seems to be OS-dependent: I observed this under Linux but not >> under Solaris >> (I was not able to test under Windows or MacOS). > > > This looks like a duplicate of PR#9301, which was fixed a couple of > weeks ago according to this NEWS entry: > > o Drawing X11 rotated text was buggy for VERY small (negative) > angle of rotation. Reported by Ben Bolker. Yes! I only checked the Graphics section... (not the Graphics-fixed one). EP __ R-devel@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-devel
