Implementación del muestreo de Gibbs en r para la estimación de parámetros del modelo de volatilidad estocástica con aplicación a datos de contaminación