Matlab - modelo de hata en matlab

function pathLoss = hataPathLoss(distance, frequency, heightTx, heightRx, environment)

    % Parámetros del modelo de propagación de Hata para diferentes entornos

    switch environment

        case 'urban'

            C = 3;  % Constante de ajuste para entorno urbano

        case 'suburban'

            C = 2;  % Constante de ajuste para entorno suburbano

        case 'rural'

            C = 1;  % Constante de ajuste para entorno rural

        otherwise

            error('Entorno no válido. Escoge entre ''urban'', ''suburban'' o ''rural''.');

    end

    % Ecuación del modelo de propagación de Hata

    pathLoss = 46.3 + 33.9 * log10(frequency) - 13.82 * log10(heightTx) ...

        - C + (44.9 - 6.55 * log10(heightTx)) * log10(distance);

    % Ajuste adicional para la altura del receptor

    if heightRx > 3

        pathLoss = pathLoss - 4.78 * (log10(frequency))^2 + 18.33 * log10(frequency) - 40.94;

    end

end

distance = 5;  % Distancia en kilómetros

frequency = 900;  % Frecuencia en MHz

heightTx = 30;  % Altura de la antena de transmisión en metros

heightRx = 5;  % Altura de la antena de recepción en metros

environment = 'urban';  % Tipo de entorno

pathLoss = hataPathLoss(distance, frequency, heightTx, heightRx, environment);

disp(['La pérdida de trayectoria estimada es ', num2str(pathLoss), ' dB.']);