R Under development (unstable) (2024-07-03 r86870 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2024 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> #  part of the Statnet suite
> #  of packages for network analysis, http://statnet.org .
> #
> #  This software is distributed under the GPL-3 license.  It is free,
> #  open source, and has the attribution requirements (GPL Section 7) at
> #  http://statnet.org/attribution
> #
> #  Copyright 2012-2013 Statnet Commons
> #######################################################################
> require(ndtv)
Loading required package: ndtv
Loading required package: network

'network' 1.18.2 (2023-12-04), part of the Statnet Project
* 'news(package="network")' for changes since last version
* 'citation("network")' for citation information
* 'https://statnet.org' for help, support, and other information

Loading required package: networkDynamic

'networkDynamic' 0.11.4 (2023-12-10?), part of the Statnet Project
* 'news(package="networkDynamic")' for changes since last version
* 'citation("networkDynamic")' for citation information
* 'https://statnet.org' for help, support, and other information

Loading required package: animation
Loading required package: sna
Loading required package: statnet.common

Attaching package: 'statnet.common'

The following objects are masked from 'package:base':

    attr, order

sna: Tools for Social Network Analysis
Version 2.7-2 created on 2023-12-05.
copyright (c) 2005, Carter T. Butts, University of California-Irvine
 For citation information, type citation("sna").
 Type help(package="sna") to get started.


'ndtv' 0.13.4 (2024-06-30), part of the Statnet Project
* 'news(package="ndtv")' for changes since last version
* 'citation("ndtv")' for citation information
* 'https://statnet.org' for help, support, and other information

> require(testthat)
Loading required package: testthat
> 
> data("short.stergm.sim")
> compute.animation(short.stergm.sim)
No slice.par found, using
slice parameters:
  start:0
  end:25
  interval:1
  aggregate.dur:1
  rule:latest

Calculating layout for network slice from time  0 to 1
Calculating layout for network slice from time  1 to 2
Calculating layout for network slice from time  2 to 3
Calculating layout for network slice from time  3 to 4
Calculating layout for network slice from time  4 to 5
Calculating layout for network slice from time  5 to 6
Calculating layout for network slice from time  6 to 7
Calculating layout for network slice from time  7 to 8
Calculating layout for network slice from time  8 to 9
Calculating layout for network slice from time  9 to 10
Calculating layout for network slice from time  10 to 11
Calculating layout for network slice from time  11 to 12
Calculating layout for network slice from time  12 to 13
Calculating layout for network slice from time  13 to 14
Calculating layout for network slice from time  14 to 15
Calculating layout for network slice from time  15 to 16
Calculating layout for network slice from time  16 to 17
Calculating layout for network slice from time  17 to 18
Calculating layout for network slice from time  18 to 19
Calculating layout for network slice from time  19 to 20
Calculating layout for network slice from time  20 to 21
Calculating layout for network slice from time  21 to 22
Calculating layout for network slice from time  22 to 23
Calculating layout for network slice from time  23 to 24
Calculating layout for network slice from time  24 to 25
Calculating layout for network slice from time  25 to 26
> timePrism(short.stergm.sim,at=c(1,10,20),
+           displaylabels=TRUE,
+           label.cex=0.5)
> 
> data(toy_epi_sim)  
> timePrism(toy_epi_sim,
+           orientation=c('z','y','x'),
+           angle=40,
+           spline.v=c(7, 29, 36, 70, 82, 96),  # hilite the infected 
+           spline.col='red',
+           spline.lwd=2,
+           box=FALSE,
+           planes=TRUE,
+           vertex.col='ndtvcol')
No coordinate information found in network, running compute.animation for 3 time points
Calculating layout for network slice from time  1 to 1
Calculating layout for network slice from time  13 to 13
Calculating layout for network slice from time  25 to 25
> 
> proc.time()
   user  system elapsed 
   2.17    0.40    2.51