Installing ‘intergraph’ package

September 17, 2010

(This article was first published on Brokering the Closure » R, and kindly contributed to R-bloggers)

After some e-mails I decided to put together a bit more detailed instruction how to install the ‘intergraph’ package together with the namespaced version of the ‘network’ package. See here.

There seemed to be some problems with downloading the namespaced ‘network’ from my webstite (thanks Neil!). File permissions were set incorrectly. I fixed that and everything should be OK now.

Because it’s Friday, another example of using ‘intergraph’. This time plot a network using both ‘igraph’ and ‘network’ functionality on the same plotting device. Here is the result:

And here is the code to produce it. lx in line 12  is “Deus Ex Machina”, or rather “Deus Ex locator()”… ;)

# rescale 'x' to [-1; 1]
res <- function(x)
 a <- -1 - (2*min(x))/(max(x)-min(x))
 b <- 2 / (max(x) - min(x))
 a + b*x
op <- par(mar=rep(0.5,4))
net <- # using 'intergraph'
k <- apply(layout.fruchterman.reingold(exIgraph), 2, res)
lx <- c(-0.5, -1)
k2 <- sweep(k, 2, lx, "+")
plot(exIgraph, layout=k, rescale=FALSE, xlim=range(rbind(k, k2)[,1]), ylim=range(rbind(k, k2)[,2]) )
plot(net, coord=k2, displaylabels=TRUE, label=net %v% "label", new=FALSE)

Filed under: networks, R, Uncategorized

To leave a comment for the author, please follow the link and comment on their blog: Brokering the Closure » R. offers daily e-mail updates about R news and tutorials on topics such as: Data science, Big Data, R jobs, visualization (ggplot2, Boxplots, maps, animation), programming (RStudio, Sweave, LaTeX, SQL, Eclipse, git, hadoop, Web Scraping) statistics (regression, PCA, time series, trading) and more...

If you got this far, why not subscribe for updates from the site? Choose your flavor: e-mail, twitter, RSS, or facebook...

Tags: , , , , ,

Comments are closed.

Search R-bloggers


Never miss an update!
Subscribe to R-bloggers to receive
e-mails with the latest R posts.
(You will not see this message again.)

Click here to close (This popup will not appear again)