Josef Šlerka josefslerka

josefslerka / gist:2335620

Created April 8, 2012 07:32

Jak zklastrovat uzivatele Twitteru podle podobnosti v siti a jak je vykreslit

	require("igraph")
	g <- read.graph("listalumia.txt", format="ncol", directed=TRUE)


	# funkce similirarity vychazi z stuie Friends and Neighbors on the Web (http://www.hpl.hp.com/research/idl/papers/web10/fnn2.pdf)

	m <-similarity.dice(g)
	colnames(m)=c(V(g)$name)
	rownames(m)=colnames(m)
	d <- dist(m, method = "euclidean") # distance matrix

josefslerka / gist:2330505

Created April 7, 2012 17:10

Jak importovat a vykreslit zakladni grafy v R a iGraph (a jak to ulozit)

	require("igraph")
	g <- read.graph("listalumia.txt", format="ncol", directed=TRUE)
	# defaultni graf
	plot(g)

	# pocet hran
	ecount(g)

	# pocet nodu
	vcount(g)