Wykład przeznaczony jest dla studentów drugiego stopnia kierunku "Big Data Analytics" na Wydziale Podstawowych Problemów Techniki. Odbywa się we wtorki w godz. - (sala A2/L1). Na stronie tej znajdziesz informacje o zasadach zaliczenia, realizowanym materiale, literaturze oraz listę zadań.
HLG[G_,wsp_:1.0]:= Block[{rG},
  rG=PageRankCentrality[G,0.85];
  HighlightGraph[G,
    VertexList[G],
    VertexSize-> Thread[VertexList[G]->wsp*rG],
    VertexLabels->Placed["Name",Tooltip]
  ]
]
Example of construction of a graph:
STAR = Join[
   Table[ToString[i] -> "a", {i, 0, 9}], 
   Table[ToString[i] -> ToString[Mod[i + 1, 10]], {i, 0, 9}]
   ]; 
Very simple (only for tests) spider:
Spider[url_, dom_, k_] := Block[{G},
  IsCorrect[s_] := StringQ[s] && StringStartsQ[s, dom];
  G = NestGraph[
    Select[Import[#, "Hyperlinks"], IsCorrect[#] &] &, url, k
  ];
  Subgraph[G, Select[VertexList[G], StringQ[#] &], 
   VertexLabels -> Placed["Name", Tooltip], DirectedEdges -> True]
  ]
and and exaple of its usage:
MGB = Spider["http://cs.pwr.edu.pl/gebala/", "http://cs.pwr.edu.pl/gebala/", 3]