R Robust Learning Algorithm with LTS Error Function