Cálculo de Corriente I Neutro

In = √((I1² + I2² + I3²) - (I1×I2) - (I1×I3) - (I2×I3))
    const I1_ef = i1 * Math.sqrt(1 + thd1 ** 2);
    const I2_ef = i2 * Math.sqrt(1 + thd2 ** 2);
    const I3_ef = i3 * Math.sqrt(1 + thd3 ** 2);

    const phiA = Math.acos(cosPhiA); // Ángulo de Ia 0°
    const phiB = Math.acos(cosPhiB) + (2 * Math.PI / 3); // (120° desfasado)
    const phiC = Math.acos(cosPhiC) - (2 * Math.PI / 3); // (-120° desfasado)

    // Convertir corrientes a componentes reales e imaginarias
    const Ia_real = I1_ef * Math.cos(phiA);  const Ia_imag = I1_ef * Math.sin(phiA);
    const Ib_real = I2_ef * Math.cos(phiB);  const Ib_imag = I2_ef * Math.sin(phiB);
    const Ic_real = I3_ef * Math.cos(phiC);  const Ic_imag = I3_ef * Math.sin(phiC);

    // Sumar las componentes reales e imaginarias de las corrientes de fase
    const In_real = -(Ia_real + Ib_real + Ic_real); 
    const In_imag = -(Ia_imag + Ib_imag + Ic_imag);

    // Calcular la magnitud de la corriente del neutro
    const In_magnitud = Math.sqrt(In_real ** 2 + In_imag ** 2);