reproduction of coarse grained work from "An equation-free approach to coarse-graining the dynamics of netowrks"