Add PageRank.R function