update x axis

both r script and png