Create bulletGraph.R