Update fourlocus_simple_40generations.R

line changes