1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
|
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/asNetwork.R
\name{asNetwork}
\alias{asNetwork}
\alias{asNetwork.data.frame}
\alias{asNetwork.igraph}
\title{Convert objects to class "network"}
\usage{
asNetwork(x, ...)
\method{asNetwork}{data.frame}(x, directed = TRUE, vertices = NULL, ...)
\method{asNetwork}{igraph}(x, amap = attrmap(), ...)
}
\arguments{
\item{x}{an R object to be coerced, see Details for the description of
available methods}
\item{\dots}{other arguments from/to other methods}
\item{directed}{logical, whether the created network should be directed}
\item{vertices}{NULL or data frame, optional data frame containing vertex
attributes}
\item{amap}{data.frame with attribute copy/rename rules, see
\code{\link{attrmap}}}
}
\value{
Object of class "network".
}
\description{
Convert objects to class "network"
}
\details{
This is a generic function which dispatches on argument \code{x}. It creates
objects of class "network" from other R objects.
The method for data frames is inspired by the similar function in package
\pkg{igraph}: \code{\link[igraph]{graph.data.frame}}. It assumes that first
two columns of \code{x} constitute an edgelist. The remaining columns are
interpreted as edge attributes. Optional argument \code{vertices} allows for
including vertex attributes. The first column is assumed to vertex id, the
same that is used in the edge list. The remaining colums are interpreted as
vertex attributes.
The method for objects of class "igraph" takes the network of that class and
converts it to data frames using \code{\link{asDF}}. The network is recreated
in class "network" using \code{asNetwork.data.frame}. The function currently
does not support bipartite "igraph" networks.
}
\examples{
# require package 'network' as 'asNetwork' generic is defined there
if(require(network, quietly=TRUE))
{
### demonstrating method for data frames
l <- asDF(exNetwork)
g <- asNetwork( l$edges, vertices=l$vertexes)
stopifnot(all.equal(g, exNetwork))
### method for igraph objects
ig <- asNetwork(exIgraph)
identical( as.numeric(as.matrix(g, "adjacency")),
as.numeric(as.matrix(ig, "adjacency")))
}
}
\seealso{
\code{\link[igraph]{graph.data.frame}}
\code{\link{asIgraph}} for conversion in the other direction.
}
|
