Update controls.R