plot accompanying random_walk_regression.R