Running ‘as.edgelist_tests.R’ [0s/0s]
  Running ‘general.tests.R’ [0s/0s]
Running the tests in ‘tests/general.tests.R’ failed.
Complete output:
  > #The following battery of tests is intended to verify the functionality of
  > #the network library
  > 
  > library(network)
  network: Classes for Relational Data
  Version 1.13.0 created on 2015-08-31.
  copyright (c) 2005, Carter T. Butts, University of California-Irvine
                      Mark S. Handcock, University of California -- Los Angeles
                      David R. Hunter, Penn State University
                      Martina Morris, University of Washington
                      Skye Bender-deMoll, University of Washington
   For citation information, type citation("network").
   Type help("network-package") to get started.
  
  > 
  > # ----- check assigning multiple attribute values in a single call ------
  > test<-network.initialize(3)
  > set.vertex.attribute(test,c('a','b'),c(1,2))
  > if(!all(test%v%'a'==c(1,1,1) & test%v%'b'==c(2,2,2))){
  +   stop('setting multiple attribute values with set.vertex.attribute failed')
  + }
  > 
  > test<-network.initialize(3)
  > set.vertex.attribute(test,list('a','b'),c(1,2))
  > if(!all(test%v%'a'==c(1,1,1) & test%v%'b'==c(2,2,2))){
  +   stop('setting multiple attribute values with set.vertex.attribute failed')
  + }
  > 
  > test<-network.initialize(3)
  > set.vertex.attribute(test,c('a','b'),list(c(1,2,3),c(4,5,6)))
  > if(!all(test%v%'a'==c(1,2,3) & test%v%'b'==c(4,5,6))){
  +   stop('setting multiple attribute values with set.vertex.attribute failed')
  + }
  > 
  > test<-network.initialize(3)
  > set.vertex.attribute(test,c('a','b'),list(list(1,2,3),list(4,5,6)))
  > if(!all(test%v%'a'==c(1,2,3) & test%v%'b'==c(4,5,6))){
  +   stop('setting multiple attribute values with set.vertex.attribute failed')
  + }
  > 
  > test<-network.initialize(3)
  > obj<-list(one='a complex object',two=c('with muliple','parts'))
  > set.vertex.attribute(test,c('a','b'),list(list(as.list(obj)),list(as.list(obj))))
  > if(!all(all.equal(get.vertex.attribute(test,'a',unlist=FALSE)[[1]],obj) & all.equal(get.vertex.attribute(test,'b',unlist=FALSE)[[1]],obj))){
  +   stop('setting multiple attribute values with list values in set.vertex.attribute failed')
  + }
  > 
  > # check assignment to list of networks
  > net <- network.initialize(2)
  > netlist <- list(net)
  > set.network.attribute(netlist[[1]],"test","a value")
  > if (!"test" %in% list.network.attributes(netlist[[1]]))
  +   stop('assignment to list of networks failed')
  Error: assignment to list of networks failed
  Execution halted