calculateMoranI function

Calculates the Moran's I using the algorithm proposed by Chen if(!exists(".Rdpack.currefs")) .Rdpack.currefs <-new.env();Rdpack::insert_citeOnly(keys="chen2009",package="Irescale",cached_env=.Rdpack.currefs) .