Running examples in 'idar-Ex.R' failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: isar
> ### Title: Individual Diversity Area Relationships
> ### Aliases: isar ipscar ipsear ipsvar ipsrar ifdar
> ### Keywords: spatial
> 
> ### ** Examples
> 
> 
> # ISAR
>    # Point pattern with a data.frame of marks
>    data(SF)
>    isar.sp_44 <- isar(mippp = SF, mimark="sp_44", namesmark="species", r=1:40) 
>    plot(isar.sp_44)
>  
>    # Point pattern with just a vector of marks
>     data(lansing)
>     isar.blackoak <- isar(mippp = lansing, mimark="blackoak",  r=seq(0.01, 0.25, le=100))
>     plot(isar.blackoak)
> 
>    # Examples of the use of different buffers
>      # No  buffer at all (by deffault, buffer = 0)
>      isar.sp_44.0 <- isar(mippp = SF, mimark="sp_44", namesmark="species", r=1:18)    
> 
>      # Adaptive buffer (for each r, use only points within a r distance form the border)
>      isar.sp_44.a <- isar(mippp = SF, mimark="sp_44", namesmark="species", r=1:18,
+                                 buffer="adapt") 
> 
>      # Predefined window, for example with a buffer of 7 m within plot limits
>      mibfw<- erosion(SF$win, r=7)
>       isar.sp_44.w <- isar(mippp = SF, mimark="sp_44", namesmark="species", r=1:18, bfw=mibfw) 
> 
> 
>    ######################
>    ### Phylogenetic functions ###
>    ######################
>    
> data(SFphylotree)
> 
> # IPSCAR
>     ipscar.sp_44 <- ipscar(mippp = SF, mimark="sp_44", namesmark="species", r=1:40,
+                                      tree=SFphylotree)
 ----------- FAILURE REPORT -------------- 
 --- failure: the condition has length > 1 ---
 --- srcref --- 
: 
 --- package (from environment) --- 
idar
 --- call from context --- 
checktree(tree = tree, mippp = mippp, idar = idar, correct.phylo = correct.phylo)
 --- call from argument --- 
if (class(tree) == "phylo") tree <- vcv.phylo(tree, corr = TRUE)
 --- R stacktrace ---
where 1: checktree(tree = tree, mippp = mippp, idar = idar, correct.phylo = correct.phylo)
where 2: ipscar(mippp = SF, mimark = "sp_44", namesmark = "species", r = 1:40, 
    tree = SFphylotree)

 --- value of length: 2 type: logical ---
[1] FALSE FALSE
 --- function from context --- 
function (tree, mippp, idar, correct.phylo) 
{
    treeold <- tree
    if (class(tree) == "phylo") 
        tree <- vcv.phylo(tree, corr = TRUE)
    sp.nok <- which(is.na(match(levels(mippp$marks), dimnames(tree)[[1]])))
    len.sp.nok <- length(sp.nok)
    names.sp.nok <- levels(mippp$marks)[sp.nok]
    if (len.sp.nok > 0) {
        if (correct.phylo == "mean") {
            meanphylo <- mean(as.dist(tree))
            dimtree <- dim(tree)
            newtree <- matrix(1, nrow = dimtree[1] + len.sp.nok, 
                ncol = dimtree[1] + len.sp.nok)
            newtree[1:len.sp.nok, ] <- meanphylo
            newtree[, 1:len.sp.nok] <- meanphylo
            newtree[-(1:len.sp.nok), -(1:len.sp.nok)] <- tree
            diag(newtree) <- 1
            dimnames(newtree) <- lapply(dimnames(tree), function(x) c(names.sp.nok, 
                x))
            warning(paste("species", names.sp.nok, "was not in the phylotree and has been included with constant mean phylogenetc covariance\n"))
            tree <- newtree
        }
        if (correct.phylo == "exclude") {
            numbers.nok <- table(mippp[mippp$marks %in% names.sp.nok]$marks)[names.sp.nok]
            mippp <- mippp[!mippp$marks %in% names.sp.nok]
            mippp$marks <- factor(mippp$marks)
            warning(paste("species ", names.sp.nok, ", with ", 
                numbers.nok, " individuals, was not in the phylotree and has been excluded from the analysis\n", 
                sep = ""))
        }
    }
    if (idar == "imntdar") {
        if (class(treeold) != "phylo") 
            stop("Computing IMNTDAR requires a phylogenetic tree of class 'phylo'\n\n")
        tree <- cophenetic(treeold)
    }
    return(tree)
}
<bytecode: 0xb4414f0>
<environment: namespace:idar>
 --- function search by body ---
Function checktree in namespace idar has this body.
 ----------- END OF FAILURE REPORT -------------- 
Fatal error: the condition has length > 1