Brought get_chroncontrol.R up to r style guide standards.