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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: edge.list
> ### Title: Decompose an edge list
> ### Aliases: edge.list
> ### Keywords: manip
> 
> ### ** Examples
> 
>   edgelist <- matrix(
+     c("matthew","john",
+       "max","stephen",
+       "matthew","stephen"),
+     byrow=TRUE, ncol=2)
>   
>   edge.list(edgelist)
 ----------- FAILURE REPORT -------------- 
 --- failure: the condition has length > 1 ---
 --- srcref --- 
: 
 --- package (from environment) --- 
rgexf
 --- call from context --- 
edge.list(edgelist)
 --- call from argument --- 
if (objClass %in% c("matrix", "data.frame")) {
    if (nCols) {
        if (!is.factor(x)) 
            x <- factor(c(x[, 1], x[, 2]))
        edges <- matrix(unclass(x), byrow = FALSE, ncol = 2)
        colnames(edges) <- c("source", "target")
        nodes <- data.frame(id = 1:nlevels(x), label = levels(x), 
            stringsAsFactors = F)
        edgelist <- list(nodes = nodes, edges = edges)
        return(edgelist)
    }
    else stop("Insuficcient number of columns (", nCols, ")")
} else stop(objClass, " class not allowed, try with a \"matrix\" or a \"data.frame\"")
 --- R stacktrace ---
where 1: edge.list(edgelist)

 --- value of length: 2 type: logical ---
[1]  TRUE FALSE
 --- function from context --- 
function (x) 
{
    objClass <- class(x)
    nEdges <- NROW(x)
    nCols <- NCOL(x) == 2
    if (objClass %in% c("matrix", "data.frame")) {
        if (nCols) {
            if (!is.factor(x)) 
                x <- factor(c(x[, 1], x[, 2]))
            edges <- matrix(unclass(x), byrow = FALSE, ncol = 2)
            colnames(edges) <- c("source", "target")
            nodes <- data.frame(id = 1:nlevels(x), label = levels(x), 
                stringsAsFactors = F)
            edgelist <- list(nodes = nodes, edges = edges)
            return(edgelist)
        }
        else stop("Insuficcient number of columns (", nCols, 
            ")")
    }
    else stop(objClass, " class not allowed, try with a \"matrix\" or a \"data.frame\"")
}
<bytecode: 0x45cce70>
<environment: namespace:rgexf>
 --- function search by body ---
Function edge.list in namespace rgexf has this body.
 ----------- END OF FAILURE REPORT -------------- 
Error in if (objClass %in% c("matrix", "data.frame")) { : 
  the condition has length > 1
Calls: edge.list
Execution halted