[EMAIL PROTECTED] wrote:
> ------- Start of forwarded message -------
> Date: Tue, 13 Nov 2007 21:44:57 +0100
> To: Steve Mongin <[EMAIL PROTECTED]>
> Cc: [EMAIL PROTECTED]
> Subject: Re: range( <dates>, na.rm = TRUE )
> In-Reply-To: <[EMAIL PROTECTED]>
> Reply-To: [EMAIL PROTECTED]
> From: Kurt Hornik <[EMAIL PROTECTED]>
> X-AntiVirus: checked by AntiVir MailGate (version: 2.1.3-2; AVE: 7.6.0.34;
> VDF: 7.0.0.210; host: fsme.wu-wien.ac.at)
> X-Virus-Scanned: ClamAV 0.90.3/4768/Tue Nov 13 18:25:08 2007 on
> pocken.wu-wien.ac.at
> X-Virus-Status: Clean
>
>
>>>>>> Steve Mongin writes:
>>>>>>
>
>
>> Dear CRAN:
>> I am running 'R' on Linux as follows:
>>
>
>
>>> version
>>>
>> _
>> platform i686-redhat-linux-gnu
>> arch i686
>> os linux-gnu
>> system i686, linux-gnu
>> status
>> major 2
>> minor 6.0
>> year 2007
>> month 10
>> day 03
>> svn rev 43063
>> language R
>> version.string R version 2.6.0 (2007-10-03)
>>
>
>
>
>> I have a question about the behavior of "range()" with missing dates.
>>
>
>
>> With the previous version (2.4?) , the command:
>>
>
>
>>> range( as.Date( c( "2007-11-06", NA ) ), na.rm = TRUE )
>>>
>
>
>> yielded:
>>
>
>
>>> [1] "2007-11-06" "2007-11-06"
>>>
>
>
>> Now I get:
>>
>
>
>>> [1] NA NA
>>>
>
>
>> Is this a bug?
>>
>
>
>> Yes, I see in the "What's New" page:
>>
>
>
>> "The Math2 and Summary groups (round, signif, all, any, max, min,
>> summ, prod, range) are now primitive."
>>
>
>
>> Is the "primitive" characteristic supposed to behave as above with
>> missing dates?
>>
>
>
>> Thanks for any help that you can provide.
>>
>
> This is really a question for r-devel or r-bugs, I think, but not for
> the CRAN maintainers.
>
> I would think it is a bug. Perhaps simply file a bug report?
>
>
Again? ;-)
The bug is here:
> range.default
function (..., na.rm = FALSE, finite = FALSE)
{
x <- c(..., recursive = TRUE)
if (is.numeric(x)) {
if (finite)
x <- x[is.finite(x)]
else if (na.rm)
x <- x[!is.na(x)]
}
c(min(x), max(x))
}
<environment: namespace:base>
Objects of class Date are not considered numeric, so we end up taking
min and max without removing NA.
One solution could be
if (is.numeric(x) || inherits(x, "Date") ){....}
--
O__ ---- Peter Dalgaard Øster Farimagsgade 5, Entr.B
c/ /'_ --- Dept. of Biostatistics PO Box 2099, 1014 Cph. K
(*) \(*) -- University of Copenhagen Denmark Ph: (+45) 35327918
~~~~~~~~~~ - ([EMAIL PROTECTED]) FAX: (+45) 35327907
______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
