* using log directory '/CRANPkg/check/GeneTS.Rcheck' * using R version 2.1.1, 2005-06-20 * checking for file 'GeneTS/DESCRIPTION' ... OK * this is package 'GeneTS' version '2.6' * checking if this is a source package ... OK * checking whether package 'GeneTS' can be installed ... OK * checking package directory ... OK * checking for portable file names ... OK * checking for sufficient/correct file permissions ... OK * checking DESCRIPTION meta-information ... OK * checking package dependencies ... OK * checking index information ... OK * checking package subdirectories ... OK * checking R files for syntax errors ... OK * checking R files for library.dynam ... OK * checking S3 generic/method consistency ... OK * checking replacement functions ... OK * checking foreign function calls ... OK * checking Rd files ... OK * checking for missing documentation entries ... OK * checking for code/documentation mismatches ... OK * checking Rd \usage sections ... OK * creating GeneTS-Ex.R ... OK * checking examples ... ERROR Running examples in GeneTS-Ex.R failed. The error most likely occurred in: > ### * ggm.plot.graph > > flush(stderr()); flush(stdout()) > > ### Name: ggm.plot.graph > ### Title: Graphical Gaussian Models: Plotting the Network > ### Aliases: ggm.plot.graph ggm.make.graph show.edge.weights > ### Keywords: hplot > > ### ** Examples > > # load GeneTS library > library(GeneTS) > > # generate random network with 20 nodes and 10 percent edges (=19 edges) > true.pcor <- ggm.simulate.pcor(20, 0.1) > > # convert to edge list > test.results <- ggm.test.edges(true.pcor, eta0=0.9, kappa=1000)[1:19,] > > # generate graph object > # NOTE: this requires the installation of the "graph" package > # (in the following "try" is used to avoid an error if the library is not installed) > try( gr <- ggm.make.graph( test.results, 20) ) Loading required package: cluster Loading required package: Ruuid Creating a new generic function for 'print' in 'Ruuid' > try( gr ) A graph with undirected edges Number of Nodes = 20 Number of Edges = 19 > try( show.edge.weights(gr) ) 1--13 2--15 3--4 3--17 4--16 4--18 5--6 6--9 7--16 8--17 8--11 0.78 -0.32 -0.53 0.31 -0.54 -0.02 0.76 0.53 -0.65 -0.53 -0.21 8--19 9--10 10--11 13--18 14--15 14--17 14--19 17--19 0.19 0.34 -0.69 -0.61 0.49 0.36 -0.25 -0.24