Refine estimate_translations.R
Create incomplete initial version of update_transforms.R