[R] writing a simple function

Roland Rau roland.rproject at gmail.com
Wed Feb 13 18:51:16 CET 2008


Hi,

Ben Bolker wrote:
> Roland Rau <roland.rproject <at> gmail.com> writes:
> 
>> does this do what you want?
>>
>> overlap <- function(a,b,c,d) {
>> 	all(c:d %in% a:b)
>> }
>> overlap(1,5,3,4)
>> overlap(1,2,3,4)
> 
>   Do you really want this to be discrete?  How about
> 
> overlap <- function(a,b,c,d) {
>    a<c && b>d
> }
you are absolutely right.[1]
I assume with discrete you mean integers?
I think the bigger problem with my function is that it makes way too 
many comparisons than are actually necessary (memory and time problems).

What about the following function:
overlap <- function(intval1, intval2) {
   (min(intval1) < min(intval2)) && (max(intval1) > max(intval2))
}

Best,
Roland

[1] I realized the problems with my solution almost as soon as I sent 
the email. But I was on a way to a meeting and there was no more time to 
correct it at that moment.



More information about the R-help mailing list