cross post from stack exchange : https://mathematica.stackexchange.com/questions/280353/how-to-create-a-graph-in-mathematica-with-a-specific-style-similar-to-the-offici
