Update raadtools.R