strategicplayers-package | R Documentation |
Identifies individuals in a social network who should be the intervention subjects for a network intervention in which you have a group of targets, a group of avoiders, and a group that is neither.
The DESCRIPTION file:
This package was not yet installed at build time.
Index: This package was not yet installed at build time.
use the sp function to get a list of strategic players indicies
Miles Ott
Maintainer: Miles Ott <miles_ott@alumni.brown.edu>
https://www.ncbi.nlm.nih.gov/pmc/articles/PMC6959850/
#I am commenting this all out so that the package won't require sna any more :)
#require(sna)
#generate a bernoulli random network on 20 nodes
#network<-rgraph(20, tprob=.2)
#get the geodesic distances of the network
#geo<-geodist(network)[2]$gdist
#defining the target group
#targets<-1:10
#defining the avoidance group
#avoids<-11:14
#defining the theta parameter
#theta<-.8
#find sp set of size 4
#spset<-sp(4, geo, targets, avoids, theta, n.loops=100)
#spset
#calculates distance metric for spset
#distance(geo, targets, avoids, theta, spset)
#plot the network with the strategic player set highlighted in yellow
#colors<-rep("white", 20)
#colors[targets]<-"green"
#colors[avoids]<-"red"
#colors[spset]<-"yellow"
#par(mar=c(1,1,1,1))
#gplot(network, vertex.col=colors,
#usearrows=FALSE, edge.col="grey",
#vertex.border="grey", vertex.cex=1.7, pad=0, label=1:dim(network)[1])
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.