Text this: Algoritmo automático para la corrección del factor de potencia en redes industriales