Create brier.R