I've finally got a relase of rSoNIA and dynamic network packages
(0.0-3) that seems to work somewhat. I've tested it on Windows, Mac,
Ubuntu Linux, and R versions 2.3.1,2.4. Let me know if it works for you.
https://csde.washington.edu/~skyebend/dynamicnetwork/current/
https://csde.washington.edu/~skyebend/rsonia/current/
unix/macs use the *.tar.gz versionlibrary(rSoNIA); #also loads dynamic networkupdateSonia();

library(rSoNIA);
data(fauxSim20);
fauxDyn <- as.dynamic(fauxSim20, check.renewal=FALSE);
There were 35 warnings (use warnings() to see them)
WARNING: check renewal false means that edges that go away and come back are treated as one continuous edge, so don't use this to debug your model!
launchSonia(fauxDyn); #if this works, quit and
continue, not very interesting
shapes <-
get.vertex.attribute(fauxDyn,"Sex");
shapes <-
replace(shapes,shapes==1,"square");
shapes <-
replace(shapes,shapes==2,"circle");
fauxDyn <-
set.vertex.attribute(fauxDyn,"shapes",shapes);
convert race into a vertex attribute of aribrary colors
set.vertex.attribute(fauxDyn,"color",colorize(get.vertex.attribute(fauxDyn,"Race")));
launchSonia(fauxDyn, vertex.col="color", usearrows=FALSE,
displaylabels=FALSE, vertex.shape="shape",vertex.cex="Grade" );




All of that is very long and painful. Once you have experimented enough to know what the good parameter values are, you can do it all directly from the command line in R
#need to specify some of the settings so it won't use default
soniaApplySettings$kk.opt.dist[2]<-20;
#specify node spacing
soniaApplySettings$kk.comp.connect[2] <- 10;
#specify distance betweeen components
soniaGraphicsSettings$layout.height[2]<-500; #increase height of
movie
soniaBrowseSettings$num.frames[2]<-10;
launchSonia(fauxDyn,
max.iter=5000,
interactive=FALSE,
vertex.col="color",
usearrows=FALSE,
displaylabels=FALSE,
vertex.shape="shape",
vertex.cex="Grade",
movie.file=file.choose(), # will bring
up the save dialog, you can also put a file name here
movie.type="swf");
If it works, you should have something that looks like this:
Note:hit your browser's reload
buttion to make the movie restart, or here to
open it in a resizeable window
If you are on a mac or a windows* machine, you can also export the
movie as a quicktime file, which is much bigger but you can scroll in
time and save it in other formats.
* unfortunately, this will not work on Windows Server 2003 machine aka
csde-ts2
launchSonia(fauxDyn,
max.iter=5000,
interactive=FALSE,
vertex.col="color",
usearrows=FALSE,
displaylabels=FALSE,
vertex.shape="shape",
vertex.cex="Grade",
movie.file=file.choose(),
movie.type="mov");
#change to "mov" instead of "swf"
If all of this works, you should end up with a movie that looks like
this.