tiedDuration: Compute the duration of time (or count of events) that each...
In tsna: Tools for Temporal Social Network Analysis

Description Usage Arguments Details Value Note Author(s) Examples

Computes the total duration that each vertex in the network is tied to other vertices by incident edges. Alternately, if mode="counts", computes the total number of incident edge spells each vertex is tied by. The later is especially useful for continuous time networks tied by edges with 0-duration events. For directed networks, the durations can be filtered using the neighborhood argument to include only incoming, outgoing, or all ties combined in order to return out-tiedor in-tied durations.

1
2
3

tiedDuration(nd, mode = c("duration", "counts"), 
                     active.default = TRUE, 
                     neighborhood = c("out", "in", "combined"))

`nd`	a `networkDynamic` object describing the network for which durations should be calculated
`mode`	either `"duration"` or `"count"` indicating if the sum of edge durations or the count of the number of edge events should be returned
`active.default`	logical, should edges with no defined activity spells be considered active by default?
`neighborhood`	value of `"out"`, `"in"` or `"combined"` indicating if – for directed networks – the durations (counts) should be limited to the vertices' ties outgoing, incoming, or combined (both).

Implemented internally using the as.data.frame.networkDynamic function and so follows the same truncation conventions for handling censored edges (edges that are active before or after the observation window of the network)

a numeric vector of length equal to the number of vertices in the network with a value equal to the sum of durations (or counts) of active edges incident upon the vertex.

Should the default neighborhood for directed network be 'combined'?

skyebend@uw.edu

  data(moodyContactSim)
  tiedDuration(moodyContactSim)
  
  data(McFarland_cls33_10_16_96)
  # compute ratio of incoming vs. outgoing speach acts
  outDur <- tiedDuration(cls33_10_16_96, mode='counts',neighborhood = 'out') 
  inDur <- tiedDuration(cls33_10_16_96, mode='counts',neighborhood = 'in')
  outDur / inDur