Update anneal.R