borrelli r code