Envoyer par SMS: Optimalizácia portfólia s využitím evolučného algoritmu v jazyku R