Text this: Zaistenie extrémnych škôd využitím metódy EOT v jazyku R