Update transition.R