3.3 Procesa datos. Coordenadas GPS y distancias al archivo.txt

Procesa las coordenadas de cada punto medido, registradas en un archivo de texto usando un GPS Diferencial.

Las coordenadas se encuentran en formato UTM ubicadas en la zona «17 M».

Ejemplo de archivo de coordenadas del GPS Diferencial

item,c_norte,c_este,altitud,etiqueta
6,9762822.08,614817.64,62.213,FIEC101
8,9762828.622,614788.477,82.308,FIEC102
7,9762836.027,614795.73,77.421,FIEC103

A los datos de cada punto se añaden los cálculos de distancia hacia cada «baliza». En el proceso, también se usa el nombre del archivo para separar el grupo y tipo de cada medición.

Para observar los datos en el mapa mediante google Earth, se convierten las coordenadas UTM a latitud y longitud. Los valores de grupo permiten segmentar los puntos en el mapa.

Referencias: https://en.wikipedia.org/wiki/Differential_GPS,
https://es.wikipedia.org/wiki/Sistema_de_coordenadas_universal_transversal_de_Mercator


Parámetros del algoritmo

En el bloque de ingreso del algoritmo se configuran los parámetros que son requeridos para obtener un archivo más completo de coordenadas y distancias.

Las posiciones para los gateways se indican como baliza, asociando el identificador d1, d2 o d3 con los nombres registrados con el GPS.

En la tabla creada se usa la etiqueta de cada punto como índice de fila. las columnas corresponden a cada dato del punto.

Un ejemplo de resultado al ejecutar del algoritmo es:

archivo resumen: resumen_ubica01.txt
una muestra de archivo: 
         grupo   tipo  LOS_d1  LOS_d2  LOS_d3      c_norte  ...  altitud  dist_d1  dist_d2  dist_d3  Longitud Latitud
etiqueta                                                    ...                                                         
FIEC101   FIEC  punto       1       1       1  9762822.080  ...   62.213  423.450   78.492  351.924 79.967500 -2.145463
FIEC102   FIEC  punto       1       1       1  9762828.622  ...   82.308  451.423   67.435  357.220 79.967762 -2.145404
FIEC103   FIEC  punto       1       1       1  9762836.027  ...   77.421  449.414   60.141  364.706 79.967697 -2.145337
FIEC104   FIEC  punto       1       1       1  9762810.917  ...   87.352  399.437   97.611  343.328 79.967307 -2.145563
FIEC105   FIEC  punto       1       1       1  9762792.518  ...   82.708  382.250  117.785  326.571 79.967231 -2.145730

archivo de gps utm: ubicapuntos01.txt

archivo de resumen de coordenadas y distancias : resumen_ubica01.txt


Algoritmo en Python

Para la conversión del sistema de coordenadas se usa la librería utm. En caso de no disponer de la librería, puede ser instalada con la instrucción pip desde una ventana de comandos:

pip install utm

con lo que es posible hacer las conversiones de UTM a latitud y longitud y viceversa.

La fórmula de distancia en UTM es la tradicional para distancia entre dos puntos en el plano.

# Datos desde GPS Diferencial a un archivo.txt
# Incorpora distancias a los vertices (baliza),
# añade grupo por sector, tipo de punto y LOS.
# Girni 2020-10-07 edelros@espol.edu.ec
import numpy as np
import pandas as pd
import utm

# INGRESO
# Archivo de coordenadas
arch_gps    = 'ubicaPuntos01.txt'

# Archivo salida procesado con distancias
arch_gpsrsm = 'resumen_ubica03.txt'
zona ='17 M'

# Referencias
baliza = {'d1':'gtwRECT',
          'd2':'gtwFIEC',
          'd3':'gtwFCNM'}
grupo = ['FIEC','FCNM','RECT','CIRC']
tipo  = ['punto','1m','gtw','dispositivo']

# digitos decimales en distancias
digitos = 3

# PROCEDIMIENTO
# leer coordenadas
ubica = pd.read_csv(arch_gps,index_col='etiqueta')
ubica.drop('item',inplace=True, axis=1)
ubica = pd.DataFrame(ubica)
n = len(ubica)
zonanum = int(zona[0:2])
zonalet = zona[3]

# vertices con balizas
baliza_key = list(baliza.keys())
baliza_val = list(baliza.values())
vertices   = ubica.loc[baliza_val]

# distancias a vertices
for fila in vertices.index:
    x1 = vertices['c_este'][fila]
    y1 = vertices['c_norte'][fila]
    x2 = ubica['c_este']
    y2 = ubica['c_norte']
    dist  = np.sqrt((x2-x1)**2 + (y2-y1)**2)
    dist  = np.round(dist,digitos)
    donde = baliza_val.index(fila)
    cual  = baliza_key[donde]
    etiq_col = 'dist_'+cual
    ubica[etiq_col] = dist

# redondear a dos digitos
ubica['c_este']  = np.round(ubica['c_este'],digitos)
ubica['c_norte'] = np.round(ubica['c_norte'],digitos)
ubica['altitud'] = np.round(ubica['altitud'],digitos)

# añadir coordenadas en latitud y longitud
ubica['longitud'] = 0.0
ubica['latitud']  = 0.0
for fila in ubica.index:
    lon_utm = ubica['c_este'][fila]
    lat_utm = ubica['c_norte'][fila]
    coord_gra = utm.to_latlon(lon_utm,lat_utm,
                              zonanum,zonalet)
    ubica['latitud'][fila]  = coord_gra[0]
    ubica['longitud'][fila] = coord_gra[1]

# grupo y tipo en cada punto
ubica.insert(0,'grupo','')
ubica.insert(1,'tipo','')
for cadauno in ubica.index:
    
    # etiqueta de grupo
    esgrupo = 'CIRC'
    for ungrupo in grupo:
        cond1 = cadauno.startswith(ungrupo)
        cond2 = cadauno.endswith(ungrupo)
        if cond1 or cond2:
            esgrupo = ungrupo
    
    # etiqueta de tipo
    estipo = tipo[0]
    for untipo in tipo:
        cond1 = cadauno.startswith(untipo)
        if cond1:
            estipo = untipo
    if esgrupo == 'CIRC':
        estipo = 'dispositivo'
    
    ubica.loc[cadauno,'grupo'] = esgrupo
    ubica.loc[cadauno,'tipo']  = estipo

# generar columna de Linea de vista LOS
columna = 2
for cadauno in baliza.keys():
    ubica.insert(columna,'LOS_'+cadauno,1)
    columna = columna + 1

# SALIDA
print('archivo resumen:', arch_gpsrsm)
print('una muestra de archivo: ')
print(ubica.head())
print('vertices: \n',vertices)
ubica.to_csv(arch_gpsrsm)

3.2 Funciones girni_lora_libreria

El archivo contiene un grupo de  funciones usadas para procesar los datos de este prototipo, se separaron del bloque principal de instrucciones con  el objetivo de simplificar el desarrollo del las actividades principales.

Recuerde disponer de este archivo en la misma carpeta que el algoritmo que invoca a la librería.

archivo de libreria: girni_lora_libreria

datos de muestras

tabulaPunto(unarchivo,directorio):
Lee el archivo de un punto, tabula cada lectura por dispositivo en diccionario,
por modo: rx, rx y remitente de cada paquete: baliza.

describePunto(punto):
estadistica descriptiva de un punto, calcula: count, mean, std, min, 25%, 50%, 75%, min, max

resumen_medida(punto,medida,descriptor):
Realiza la tabla resumen de puntos por la medida y descriptor a partir de la tabla de los puntos estadisticos descritos

Linealización para ecuación

pares_usar(tabla, baliza, analiza,unabaliza, unsector =», medida = ‘rssi’,modo = ‘rx’)

Selecciona desde la tabla puntos a usar respecto a una baliza, el resultado se entrega en una lista que contiene los pares ordenados y sus etiquetas [pares, par_etiqueta]

linealiza_lstsq(xi,yi,digitos = 3)
emplea el método de minimos cuadrados para entregar la ecuacion mediante un diccionario que contiene los parámetros para aplicarla.

La variable dígitos indica cuántos dígitos se usarán para la ecuación en formato latex.

El procedimiento se describe en: Rssi(distancia) Linealización – función Python

unaecuacion = {'alpha'   : alpha,
               'beta'    : beta,
               'eq_latex': fdtxt0,
               'intervalox' : [np.min(xi),np.max(xi)],
               'error_medio': dyi0mean,
               'error_std'  : dyi0std,
               'eqg_latex'  : grtxt0,
               'intervaloy'  : [np.min(yi),np.max(yi)],
               'errorx_medio': dxi0mean,
               'errorx_std'  : dxi0std,
               }

Proceso de triangulación

dist_rssi(valor,ecuacion_rssi).  Evalua la ecuacion de distancia(rssi) revisando los intervalos disponibles para el valor de rssi dado.

cruce2circulos(x1,y1,r1,x2,y2,r2). Revisa intervalo de area de cruce entre dos círculos de centro y radio: x1, y1, r1 // x2, y2, r2.

raices2circulos(x1,y1,r1,x2,y2,r2,tolera=1e-10). Busca las intersección entre 2 circulos de centro y radio: x1,y1,r1 || x2,y2,r2 . Revisa con cruce2circulos().

intersectacirculos(radio,centro,tolera=1e-10). Busca las intersecciones entre parejas de varios círculos y las entrega como [raicesx,raicesy], usa las funciones cruce2circulos() y con raices2circulos() que se encuentran en el enlace: Solución General de intersección de círculos

trilatera(radio,centro,tolera=1e-10). Busca el baricentro entre las intersecciones de varios círculos, punto central en el área de
intersección entre varios circulos. Requiere el resultado de la función:
raiztodas = intersectacirculos(centro,radio, tolera = 1e-10)


Algoritmo Python

# Girni LoRa librerias 2020-10-07
# LoRa-Multipunto, lecturas de Rssi y SNR
# Girni 2020-10-07 propuesta: edelros@espol.edu.ec

import numpy as np
import pandas as pd
import scipy.optimize as sp

def tabulaPunto(unarchivo,carpeta, prefijo = 'multipunto'):
    ''' Lee el archivo de un punto dentro del carpeta,
        elimina el prefijo el nombre del archivo,
        tabula cada lectura por dispositivo en diccionario,
        por modo: rx, rx
        y remitente de cada paquete: baliza
        Prepara para procesar estadistica descriptiva
    '''
    # Datos estructura
    punto = {'rx':{},
             'tx':{},
             'nombre': ' '}
    
    # Lectura de unarchivo
    unarchivoubica = carpeta+'/'+unarchivo
    archivoPunto = open(unarchivoubica,'r')

    # nombre del punto desde nombre archivo
    pnombre = unarchivo
    pnombre = pnombre.strip('.txt')
    n = len(prefijo)
    pnombre = pnombre[n:]
    punto['nombre'] = pnombre
    
    linea = archivoPunto.readline()
    while (linea!=''):
        linea_rx = linea.startswith('rx')
        linea_tx = linea.startswith('tx')
        if linea_rx or linea_tx:
            # formato de trama:
            # tx_rx, c1_ff, d1_d2_d3, numtrama,
            # rssitx, snrtx, rssi_rx,snr_rx
            texto = linea.strip('\n')
            texto = texto.split(',')
            rx_tx      = texto[0]
            dir_recibe = texto[1]
            dir_remite = texto[2]
            ID_paquete = int(texto[3])
            rssi_tx    = float(texto[4])
            snr_tx     = float(texto[5])
            rssi_rx    = float(texto[6])
            snr_rx     = float(texto[7])
            # llena datos
            if dir_remite in punto[rx_tx].keys():
                punto[rx_tx][dir_remite]['rssi_rx'].append(rssi_rx)
                punto[rx_tx][dir_remite]['snr_rx'].append(snr_rx)
                punto[rx_tx][dir_remite]['secuencia_rx'].append(ID_paquete)
                punto[rx_tx][dir_remite]['rssi_tx'].append(rssi_tx)
                punto[rx_tx][dir_remite]['snr_tx'].append(snr_tx)
            else:
                punto[rx_tx][dir_remite] = {'rssi_rx': [rssi_rx],
                                            'snr_rx' : [snr_rx],
                                            'secuencia_rx':[ID_paquete],
                                            'rssi_tx': [rssi_tx],
                                            'snr_tx' : [snr_tx]}
        # siguiente línea
        linea = archivoPunto.readline()
    archivoPunto.close()
    return(punto)

def describePunto(punto):
    ''' estadistica descriptiva de un punto
    calcula y registra count, mean, std,
    min,25%,50%,75%,max
    '''
    estadistica = {}
    for modo in punto.keys():
        estadistica[modo] = {}
        # analiza rssi y snr para rx y tx
        for disp in punto[modo].keys():
            estadistica[modo][disp] = ''
            valores = pd.DataFrame(punto[modo][disp])
            descrito = valores.describe()
            descrito = descrito.drop('secuencia_rx',axis=1)
            estadistica[modo][disp] = descrito       
    return(estadistica)


def resumen_medida(punto,medida,descriptor):
    '''
    Realiza la tabla resumen de puntos por
    medida ('rssi' o 'snr')
    y descriptor ('count, mean, std,
     min,25%,50%,75%,max)
    a partir de la tabla de los puntos estadisticos descritos
    '''
    rsm_disp = pd.DataFrame()
    for disp in punto:
        undisp_rx = punto[disp][medida+'_rx']
        etiquetarx = medida+'_rx_'+disp
        rsm_disp[etiquetarx] = undisp_rx.copy()
    for disp in punto:
        undisp_tx = punto[disp][medida+'_tx']
        etiquetatx = medida+'_tx_'+disp
        rsm_disp[etiquetatx] = undisp_tx.copy()
    unafila = rsm_disp.loc[descriptor]
    return(unafila)

def pares_usar(tabla,baliza, analiza,
                unabaliza, unsector ='', 
                medida = 'rssi', modo = 'rx'):
    ''' Selecciona en tabla los puntos a usar
        respecto a una baliza  y sector
        resultado en [pares, par_etiqueta]
    '''
    
    # balizas referencia para analizar
    baliza_key = list(baliza.keys())
    baliza_val = list(baliza.values())

    donde = baliza_val.index(unabaliza)
    cualbaliza = baliza_key[donde]

    # banderas de uso y atipicos
    bal_sec = cualbaliza+unsector
    tabla['usar_'+bal_sec] = 0
    tabla['atip_'+bal_sec] = 0
        
    # Parametros
    if unsector == '':
        analizarque = analiza[unabaliza]
    else:
        analizarque = analiza[unabaliza][unsector]
    atipico_std = analizarque['atipico_std']
    bal_grp = analizarque['grp']
    bal_tip = analizarque['tip']
    bal_LOS = analizarque['LOS']
            
    # usar segmento de grupo/tipo, bandera True/False
    for cadapunto in tabla.index:
        cond1 = tabla['grupo'][cadapunto] in bal_grp
        cond2 = tabla['tipo'][cadapunto] in bal_tip
        cond3 = tabla['LOS_'+cualbaliza][cadapunto] in bal_LOS
        cond4 = True
        if unsector != '':
            cond4 = tabla['sector_'+cualbaliza][cadapunto] == int(unsector.strip('s'))
        usar = cond1 and cond2 and cond3 and cond4
        valor = 0
        if usar:
            valor = 1
        tabla.loc[cadapunto,'usar_'+bal_sec] = valor

    # datos hacia baliza
    pares = []
    par_etiqueta = []
    for cadapunto in tabla.index:
        columna = medida+'_'+modo+'_'+cualbaliza
        xk = tabla['dist_'+cualbaliza][cadapunto]
        yk = tabla[columna][cadapunto]
        
        # no vacio y para usar
        cond1 = not(np.isnan(yk))
        cond2 = tabla['usar_'+bal_sec][cadapunto]
        if cond1 and cond2:
            unpar = np.array([xk,yk])
            
            # llena pares y etiquetas
            if len(pares)>0:
                pares = np.concatenate((pares,[unpar]),axis=0)
                par_etiqueta = np.concatenate((par_etiqueta,[cadapunto]),
                                              axis=0)
            else:
                pares = np.array([unpar])
                par_etiqueta = np.array([cadapunto])

    # ordena pares para gráfica
    if len(pares)>0:
        ordenar = np.argsort(pares[:, 0])
        pares = pares[ordenar]
        par_etiqueta = par_etiqueta[ordenar]

    return ([pares, par_etiqueta])

def linealiza_lstsq(xi,yi,digitos = 3):
    ''' usa minimos cuadrados para entregar la ecuacion
        digitos: usados en expresion latex
    '''
    unaecuacion = {}
    # Eje x en log10()
    xilog = np.log10(xi)
    n = len(xi)
    
    # mínimos cuadrados (least square),
    # distancia vs medida
    A = np.vstack([xilog, np.ones(n)]).T
    [m0, b0] = np.linalg.lstsq(A, yi, rcond=None)[0]
    alpha = -m0/10
    beta  = b0

    # ecuaciones expresion rssi(d)
    fdist0 = lambda d: -10*alpha*(np.log10(d))+beta
    
    fdtxt0 = r'$ rssi = -10(' + str(np.round(alpha,digitos))
    fdtxt0 = fdtxt0 + ')log_{10}(d)' # +('
    texto = '+'
    if beta <0:
        texto = '-'
    fdtxt0 = fdtxt0 + texto + str(np.round(np.abs(beta),digitos))+' $'

    # Errores respecto a rssi(d) 
    yi0  = fdist0(xi)
    dyi0 = yi - yi0
    dyi0mean = np.mean(np.abs(dyi0))
    dyi0std  = np.std(dyi0, dtype=np.float64)

    # ecuaciones expresion d(rssi)
    grssi0 = lambda rssi: 10**((beta-rssi)/(10*alpha))
    grtxt0 = r"$ d = 10^{(" + str(np.round(beta,digitos)) + ' - '
    grtxt0 = grtxt0 + 'rssi)/' + '(10('+str(np.round(alpha,digitos))+'))} $'

    # Errores respecto a rssi(d) 
    xi0  = grssi0(yi)
    dxi0 = xi - xi0
    dxi0mean = np.mean(np.abs(dxi0))
    dxi0std  = np.std(dxi0, dtype=np.float64)
    
    unaecuacion = {'alpha'   : alpha,
                   'beta'    : beta,
                   'eq_latex': fdtxt0,
                   'intervalox' : [np.min(xi),np.max(xi)],
                   'error_medio': dyi0mean,
                   'error_std'  : dyi0std,
                   'eqg_latex'  : grtxt0,
                   'intervaloy' : [np.min(yi),np.max(yi)],
                   'errorx_medio': dxi0mean,
                   'errorx_std'  : dxi0std,
                   }
    return(unaecuacion)

def dist_rssi(valor,ecuacion_rssi, desplazar = 0):
    ''' evalua ecuacion de distancia(rssi)
        revisando los intervalos disponibles
    '''
    # resultados
    distancia = np.nan
    e_mean = np.nan
    e_1std = np.nan
    e_2std = np.nan
    
    # Revisa intervalos en ecuacion
    interv_fuera = 0
    tamano = len(ecuacion_rssi)
    eq_cual = list(ecuacion_rssi.keys())

    # revisa si hay ecuaciones
    if tamano >= 1:
        # en intervalo de todos los puntos?
        i_eq = 'r0'
        a = ecuacion_rssi[i_eq]['intervaloy'][0]
        b = ecuacion_rssi[i_eq]['intervaloy'][1]
        desplaza = 0; valor0 = valor
        if 'desplaza' in list(ecuacion_rssi[i_eq].keys()):
            desplaza = ecuacion_rssi[i_eq]['desplaza']
        if desplazar == 1:
            valor0 = valor - desplaza
        if valor0<a:
            interv_fuera = -1 # izquierda
        if valor0>=b:
            interv_fuera = 1  # derecha
    if interv_fuera!=0:
        if interv_fuera == 1: # derecha
            i_eq = eq_cual[1]
        if interv_fuera == -1: # izquierda
            i_eq = eq_cual[-1]
        # intervalo rssi [a,b)
        a = ecuacion_rssi[i_eq]['intervaloy'][0]
        b = ecuacion_rssi[i_eq]['intervaloy'][1]
        alpha = ecuacion_rssi[i_eq]['alpha']
        beta = ecuacion_rssi[i_eq]['beta']
        # correccion de formula por desplazamiento
        desplaza = 0; valor1 = valor
        if 'desplaza' in list(ecuacion_rssi[i_eq].keys()):
            desplaza = ecuacion_rssi[i_eq]['desplaza']
        if desplazar == 1:
            valor1 = valor - desplaza
        distancia = 10**((valor1-beta)/(-10*alpha))
        
        # errores estimados de distancia
        error_medio = ecuacion_rssi[i_eq]['error_medio']
        error_std  = ecuacion_rssi[i_eq]['error_std']
        dist_mean = 10**((valor-error_medio-beta)/(-10*alpha))
        dist_1std = 10**((valor-error_std-beta)/(-10*alpha))
        dist_2std = 10**((valor-2*error_std-beta)/(-10*alpha))
        e_mean = np.abs(distancia-dist_mean)
        e_1std = np.abs(distancia-dist_1std)
        e_2std = np.abs(distancia-dist_2std)

    # evalua valor si hay ecuacion
    if tamano>1 and interv_fuera == 0:
        donde = eq_cual.index('r0')
        eq_cual.pop(donde)
        # Revisa que exista ecuacion en cada intervalo
        for i_eq in eq_cual:
            if ecuacion_rssi[i_eq] is None:
                donde = eq_cual.index(i_eq)
                eq_cual.pop(donde)
                
        # revisa intervalo y evalua
        for i_eq in eq_cual:
            # correccion de formula por desplazamiento
            desplaza = 0; valor1 = valor
            if 'desplaza' in list(ecuacion_rssi[i_eq].keys()):
                desplaza = ecuacion_rssi[i_eq]['desplaza']
            if desplazar == 1:
                valor1 = valor - desplaza
            # intervalo rssi [a,b)
            a = ecuacion_rssi[i_eq]['intervaloy'][0]
            b = ecuacion_rssi[i_eq]['intervaloy'][1]
            
            cond1 = (valor1>=a) and (valor1<b)
            
            if cond1:
                alpha = ecuacion_rssi[i_eq]['alpha']
                beta = ecuacion_rssi[i_eq]['beta']
                distancia = 10**((valor1-beta)/(-10*alpha))
                
                # errores estimados de distancia
                error_medio = ecuacion_rssi[i_eq]['error_medio']
                error_std  = ecuacion_rssi[i_eq]['error_std']
                dist_mean = 10**((valor-error_medio-beta)/(-10*alpha))
                dist_1std = 10**((valor-error_std-beta)/(-10*alpha))
                dist_2std = 10**((valor-2*error_std-beta)/(-10*alpha))
                e_mean = np.abs(distancia-dist_mean)
                e_1std = np.abs(distancia-dist_1std)
                e_2std = np.abs(distancia-dist_2std)
    
    return([distancia,e_mean,e_1std,e_2std,interv_fuera])

# Las siguientes funciones tienen como objetivo
# realizar la trilateración entre varios circulos
# def trilatera(radio,centro,tolera=1e-10)
# requieren las funiones:
# def cruce2circulos(x1,y1,r1,x2,y2,r2)
# def raices2circulos(x1,y1,r1,x2,y2,r2,tolera=1e-10)
# def intersectacirculos(radio,centro,tolera=1e-10)

def cruce2circulos(x1,y1,r1,x2,y2,r2):
    ''' Revisa intervalo de area de cruce
        entre dos círculos de centro y radio
        x1,y1,r1 // x2,y2,r2
    '''
    uncruce = []
    dx = x2 - x1
    dy = y2 - y1
    d_centros = np.sqrt(dx**2 + dy**2)
    d_cruce   = r2 + r1
    
    # los circulos se cruzan o tocan
    if d_cruce >= d_centros:

        # intervalos de cruce
        xa = np.max([x1-r1,x2-r2])
        xb = np.min([x1+r1,x2+r2])
        ya = np.max([y1-r1,y2-r2])
        yb = np.min([y1+r1,y2+r2])
        
        # cada circulo arriba, abajo
        abajo1 = 0 ; arriba1 = 0
        abajo2 = 0 ; arriba2 = 0
        if ya<=y1:
            abajo1  = 1
        if yb>=y1:
            arriba1 = 1
        if ya<=y2:
            abajo2  = 1
        if yb>=y2:
            arriba2 = 1
        sector  = [ abajo1*abajo2, abajo1*arriba2,
                   arriba1*abajo2, arriba1*arriba2]
        uncruce = [xa,xb,ya,yb,sector]
    return(uncruce)

def raices2circulos(x1,y1,r1,x2,y2,r2,tolera=1e-10):
    ''' busca las intersección entre 2 circulos
        de centro y radio: x1,y1,r1 || x2,y2,r2
        revisa con cruce2circulos()
    '''
    casicero = tolera*np.min([r1,r2])
    uncruce = cruce2circulos(x1,y1,r1,x2,y2,r2)
    raizx = []; raizy = []
    secruzan =  0
    
    # si hay cruce de circulos
    if len(uncruce)>0:
        sectores = [[-1,-1],[-1,1], 
                    [ 1,-1],[ 1,1]]
        [xa,xb,ya,yb,sector] = uncruce
        xc = (xa+xb)/2
        dx = xb-xa
        dy = yb-ya
        k = len(sector)
        if dx<casicero: # se tocan en un punto
            k = 1
        for j in range(0,k,1):
            if sector[j]==1:
                s1 = sectores[j][0]
                s2 = sectores[j][1]
                def gx(x,x1,r1,casicero):
                    z = r1**2-(x-x1)**2
                    if np.abs(z)<casicero:
                        z = 0
                    return(z)
                fx1 = lambda x: s1*np.sqrt(gx(x,x1,r1,casicero)) + y1
                fx2 = lambda x: s2*np.sqrt(gx(x,x2,r2,casicero)) + y2
                fx  = lambda x: fx1(x)-fx2(x)
                
                fa = fx(xa)
                fb = fx(xb)
                raiz1 = np.nan
                raiz2 = np.nan
                
                # intervalo/2 izquierda
                xc = xc + dx*tolera
                fc = fx(xc)
                cambio = np.sign(fa)*np.sign(fc)
                if cambio<0:
                    raiz1 = sp.bisect(fx,xa,xc,xtol=tolera)
                    
                # intervalo/2 derecha
                xc = xc - 2*dx*tolera
                fc = fx(xc)
                cambio = np.sign(fc)*np.sign(fb)
                if cambio<0:
                    raiz2 = sp.bisect(fx,xc,xb,xtol=tolera)
                    
                # si hay contacto en un borde
                if dx<casicero and dy>0:
                    raiz1 = xa
                if dy<casicero and dx>0:
                    raiz1 = x1
                    
                # Añade si existe raiz
                if not(np.isnan(raiz1)):
                    raizx.append(raiz1)
                    raizy.append(fx1(raiz1))
                if not(np.isnan(raiz2)):
                    raizx.append(raiz2)
                    raizy.append(fx1(raiz2))
                secruzan = 1
    # No hay cruce de circulos
    if len(uncruce) == 0:
        dx = x2 - x1
        dy = y2 - y1
        m = dy/dx
        theta = np.arctan2(dy,dx)
        dx1 = r1* np.cos(theta)
        dx2 = r2* np.cos(theta)
        xi1 = x1 + dx1
        xi2 = x2 - dx2
        b = y1 - m*x1
        raizx = [(xi1+xi2)/2]
        raizy = [m*raizx[0]+b]
        
    raices = [raizx,raizy,secruzan]
    return(raices)

def intersectacirculos(radio,centro,tolera=1e-10):
    ''' busca las intersecciones entre parejas de varios
        círculos y las entrega como [raicesx,raicesy]
        usa las funciones cruce2circulos()
        y con raices2circulos() que se encuentran en el enlace:
    
s3Eva_IT2018_T1 Intersección de dos círculos
'''
vertices = list(centro.keys()) n = len (vertices) # agrupa raices en todasx y todasy todasx = [] ; todasy = [] cruces = np.zeros(shape=(n,n),dtype=int) for i in range(0,n-1,1): for j in range(i+1,n,1): x1 = centro[vertices[i]][0] y1 = centro[vertices[i]][1] r1 = radio[vertices[i]] x2 = centro[vertices[j]][0] y2 = centro[vertices[j]][1] r2 = radio[vertices[j]] # busca raices entre 2 circulos raices = raices2circulos(x1,y1,r1,x2,y2,r2,tolera) raizx = raices[0] raizy = raices[1] cruces[i,j] = raices[2] cruces[j,i] = raices[2] m = len(raizx) if m>0: for k in range(0,m,1): todasx.append(raizx[k]) todasy.append(raizy[k]) raiztodas = [todasx,todasy,cruces] return(raiztodas) def trilatera(radio,centro,tolera=1e-10): ''' busca el baricentro entre las intersecciones de varios círculos punto central en el área de intersección entre varios circulos. requiere el resultado de la función: raiztodas = intersectacirculos(centro,radio, tolera = 1e-10) ''' vertices = list(centro.keys()) n = len (vertices) # revisa raiz dentro de cada circulo raiztodas = intersectacirculos(radio,centro,tolera) todasx = raiztodas[0] todasy = raiztodas[1] cruces = raiztodas[2] m = len(todasx) raicesx = [] raicesy = [] fuera = [] for k in range(0,m,1): xk = todasx[k] yk = todasy[k] dentro = 0 for i in range(0,n,1): x1 = centro[vertices[i]][0] y1 = centro[vertices[i]][1] r1 = radio[vertices[i]] dx = x1-xk dy = y1-yk d_centro = np.sqrt(dx**2+dy**2) if d_centro<=(r1*(1+tolera)): dentro = dentro + 1 if dentro == n: raicesx.append(xk) raicesy.append(yk) # busca baricentro baricentro = np.nan barerror = np.nan q = len(raicesx) if q>0: xbar = np.mean(raicesx) ybar = np.mean(raicesy) baricentro = [xbar,ybar] barerror = 0 for i in range(0,q,1): d = np.sqrt((xbar-raicesx[i])**2+(ybar-raicesy[i])**2) if d>barerror: barerror = d poligono = [raicesx,raicesy] else: poligono = [todasx,todasy] resultado = {'baricentro': baricentro, 'barerror' : barerror, 'poligono' : poligono, 'nocruzaen' : ''} # revisa espacio entre circulos sumacruces = np.sum(cruces,axis = 0) if 0 in list(sumacruces): raicesx = todasx.copy() raicesy = todasy.copy() for i in range(0,n,1): if sumacruces[i]==0: x1 = centro[vertices[i]][0] y1 = centro[vertices[i]][1] lejanamax = -1 lejana_en = -1 for k in range(0,len(raicesx),1): dx = x1 - raicesx[k] dy = y1 - raicesy[k] d_centro = np.sqrt(dx**2+dy**2) if d_centro>lejanamax: lejanamax = d_centro lejana_en = k if lejana_en>=0: raicesx.pop(lejana_en) raicesy.pop(lejana_en) # busca baricentro baricentro = np.nan barerror = np.nan q = len(raicesx) if q>0: xbar = np.mean(raicesx) ybar = np.mean(raicesy) baricentro = [xbar,ybar] barerror = 0 for i in range(0,q,1): d = np.sqrt((xbar-raicesx[i])**2+(ybar-raicesy[i])**2) if d>barerror: barerror = d poligono = [raicesx,raicesy] else: poligono = [todasx,todasy] resultado = {'baricentro': baricentro, 'barerror' : barerror, 'poligono' : poligono, 'nocruzaen' : vertices[i] } return(resultado)

3.1 Procesa datos. Resumen de archivos.txt por punto, Rssi o SNR

Los archivos de las capturas de datos por USB-Serial que se obtienen en las campañas de medición en cada punto, se requieren: procesar, ordenar y obtener los valores representativos del comportamiento del RSSI y SNR.

Cada archivo contiene al menos 100 lecturas a cada baliza. Los archivos se encuentran en una carpeta desde donde se procesarán y se obtendrá un archivo «resumen».

Para procesar los archivos de deben indicar los siguientes parámetros:

  • medida a observar: rssi, snr
  • descriptor estadistico a usar: mean, std, count, max, min, …
  • trama: rx
  • una ‘carpeta’ donde se encuentran los archivos a procesar
  • nombre del archivo de resultados

Un ejemplo de los resultados en el resumen por punto del promedio Rssi es:

resumen trama: rx  medida: rssi
         rssi_rx_d1  rssi_rx_d2  rssi_rx_d3  rssi_tx_d1  rssi_tx_d2  rssi_tx_d3
FCNM101 -124.396907 -129.132184  -81.620000  -98.000000 -126.632184  -78.040000
FCNM102 -114.345455 -118.917526  -92.053571  -91.000000 -118.474227  -80.482143
FCNM103 -115.459854 -124.634615  -95.453901  -91.000000 -123.173077  -76.617021
FCNM104 -115.922414 -123.678899 -110.090909  -91.000000 -122.844037 -107.933884
FCNM105 -108.239726 -124.893204 -102.007042  -91.000000 -123.582524  -99.281690
FCNM106 -128.383929 -127.910000 -117.589041  -91.000000 -127.290000 -110.082192
FCNM107 -124.429907 -123.009009 -105.078125  -91.000000 -123.225225 -102.343750

Carpeta con archivos a procesar: lectura_puntos

Archivos resultado:

para Rssi: resumen_rssimean01.txt

Para SNR: resumen_snrmean01.txt


Algortimo en Python

Para simplificar el algoritmo, se realizó una libreria de funciones, «girni_lora_libreria.py»,  que se debe de ubicar en la misma carpeta del algoritmo que lo usa.

Para almacenar los datos tabulados, se crea tambien el archivo de ésta tabla en formato .json, en caso de que se requiera realizar otro tipo de análisis a los datos.

'''
Procesa Archivo.txt de LoRa Rssi y SNR
de muestras desde un puerto Serial
Girni 2020-10-07 propuesta: edelros@espol.edu.ec
medida: 'rssi', 'snr'
unestadistico: 'count', 'mean', 'std',
      'min', '25%', '50%', '75%', 'max'
modo: rx baliza a dispositivo
      tx difusion hacia balizas
'''

import os
import numpy as np
import pandas as pd
import girni_lora_libreria as girni

# INGRESO
# revisar parametros al inicio
medida     = 'rssi'
descriptor = 'mean'
trama      = 'rx'

# carpeta de Archivos entrada
carpeta = 'Lecturas_dispositivo'

# Archivos para resultados
arch_rsmUnestadistico = 'resumen_'+medida+descriptor+'02.txt'
arch_detalle = 'tabla_puntosdatos2.json'

# PROCEDIMIENTO
# lista los archivos entrada en la carpeta
archivosPuntos = os.listdir(carpeta)

# Lee cada archivo de un punto y tabula
# las lecturas por cada trama: rx, tx
# cada remitente de paquete: baliza
tabula = {}
for unarchivo in archivosPuntos:
    unpunto  = girni.tabulaPunto(unarchivo,carpeta)
    p_nombre = unpunto['nombre']
    tabula[p_nombre] = unpunto
tabula = pd.DataFrame(tabula)
tabula = tabula.drop(['nombre'])
tabula = tabula.T

# Estadistica descriptiva de cada punto tabulado
descrito = {}
for cadapunto in tabula.index:
    punto = tabula.loc[cadapunto]
    descrito[cadapunto] = girni.describePunto(punto)

# resumen de una medida: rssi, snr
rsm_medida = pd.DataFrame()
for cadapunto in descrito.keys():
    punto = descrito[cadapunto][trama]
    unafila = girni.resumen_medida(punto,medida,descriptor)
    rsm_medida[cadapunto] = unafila
rsm_medida = rsm_medida.T
rsm_medida = rsm_medida.sort_index(axis=1)

# SALIDA
# muestra en pantalla solo un ejemplo.head()
print('resumen trama: ', trama,', medida: ', medida)
print(rsm_medida.head(n=10))

# Se escribe todo el archivo a csv
rsm_medida.to_csv(arch_rsmUnestadistico)

# Para grabar en formato .json
tabula.to_json(arch_detalle)

2.2 Captura datos. Dispositivo con USB-Serial a un archivo.txt usando Python

La relación de valores de Rssi y distancia hacia cada punto de referencia (baliza), se estima a partir de las mediciones en varios puntos establecidos y ubicados en un mapa.

En cada punto, los valores se estiman considerando usar al menos 100 lecturas hacia cada baliza en cada punto.

En éste proceso usa un computador portátil que captura las tramas de cada paquete recibido por el dispositivo desde el puerto USB-Serial a un archivo.txt.

Cada baliza periodicamente emite un paquete que permite al dispositivo registar los valores de Rssi y SNR. Cada captura se registra en una línea de texto como un paquete recibido y etiquetado como «rx».

Para registrar el Rssi y SNR desde el otro extremo, la baliza, se emite un paquete de difusión desde el dispositivo, con el que la baliza al recibirlo toma los valores de Rssi y SNR y los envia al dispositivo en el próximo envío. El paquete de difusión del dispositivo se etiqueta como ‘tx’ en el archivo txt.

En la pantalla del computador portátil se muesta el estado del registro de datos en cada evento de recepción.

Configuración del algoritmo en Python

La captura de datos desde USB se realiza usando instrucciones en Python, con la que se pre-procesa cada paquete y se almacena en un archivo.

En el bloque de INGRESO es necesario indicar:

  • el puerto ‘com’ y los baudios del dispositivo conectado por USB
  • el nombre del archivo de texto que registra la captura de datos
  • las direcciones de las balizas, identificadores indicados en la sección anterior
  • la cantidad mínima de lecturas desde cada baliza

El puerto ‘com’ se puede verificar antes de iniciar la captura, usando el IDE de arduino, al conectar lo muestra en el menu de herramientas/puerto.

El proceso de captura se ejecuta en un lazo, en caso de ser necesario deterner se pueden usar las teclas «Ctrl-c».

En cada punto de referencia se requiere asignar un nombre a cada archivo, iniciando el nombre con «multipunto» añadiendo letras para identificar el sector y un número como identificador del punto.

En los puntos de prueba el nombre del archivo inicia con «mpcircuito». Observe que ambas palabras de inicio contienen la misma cantidad de caracteres, pues facilita el procesamiento de los archivos.

Los archivos se almacenan en una carpeta de donde se puedan leer por lotes en el siguiente proceso de los datos.


Algoritmo en Python

''' Rssi y SNR LoRa punto a punto
paquete de datos desde puerto Serial
generados desde dispositivo LoRa
modelo Heltec Lora 32 v.2
Girni 2020-10-07 propuesta: edelros@espol.edu.ec
'''
import numpy as np
import matplotlib.pyplot as plt
import serial, time

# INGRESO
# Puerto de captura de datos USB-Serial
puerto = 'com3'
baudios = 115200

# Archivo para el registro de cada evento rx,tx
nombrearchivo = 'multipuntoFIEC101.txt'

# identificadores de balizas
baliza = ['d1','d2','d3']

# Mínimo de lecturas por baliza
lecturasMin = 100

# PROCEDIMIENTO
# Crea registro de lecturas
n = len (baliza)
registro = {}
for elemento in baliza:
    registro[elemento] = {'cuenta': 0 ,
                          'rssi': np.array([0.0,0.0]),
                          'snr':  np.array([0.0,0.0]),
                          'SumaRssi': np.array([0.0,0.0]),
                          'SumaSnr':  np.array([0.0,0.0]),
                          'minmaxRssi': np.array([0.0,-200.0,0.0,-200.0]),
                          'minmaxSnr': np.array([100.0,0.0,100.0,0.0])
                          }

# inicializa archivo.txt a vacio
archivo = open(nombrearchivo,'w')
archivo.close()  # Cierra el archivo

# Abre puerto Serial
arduino = serial.Serial(puerto, baudios)
arduino.setDTR(False)
time.sleep(0.3)

# limpia buffer de datos anteriores
arduino.flushInput()  
arduino.setDTR()  
time.sleep(0.3)
print('\nEstado del puerto: ',arduino.isOpen())
print('Nombre del dispositivo conectado: ', arduino.name)
print('Dump de la configuración:\n ',arduino)
print('\n###############################################\n')

# Lectura de datos
np.set_printoptions(precision=2)
conteo = 0
difunde = 0
while conteo<lecturasMin:
    #esperar hasta recibir un paquete
    while (arduino.inWaiting()==0):
        pass 

    # leer linea desde puerto serial
    linea = arduino.readline()
    # binario a texto, elimina /r/n
    texto = linea.decode()
    texto = linea.strip()
    
    # identificar la trama como rx, tx
    cond1 = texto.startswith('tx')
    cond2 = texto.startswith('rx')
    if cond1 or cond2:
        archivo = open(nombrearchivo,'a')
        archivo.write(texto+'\n')
        archivo.close()
        
        if (texto.startswith('tx')):
            difunde = difunde + 1
        if (texto.startswith('rx')):
            texto = texto.split(',')
            tipo  = texto[0]
            dir_remite = texto[2]
            paqrcbvID  = texto[3]
            rssi_tx    = float(texto[4])
            snr_tx     = float(texto[5])
            rssi_rx    = float(texto[6])
            snr_rx     = float(texto[7])
            if tipo == "rx":
                # conteo de lecturas
                cual = dir_remite
                registro[cual]['cuenta']=registro[cual]['cuenta']+1
                if registro[cual]['cuenta']<conteo:
                    conteo = registro[cual]['cuenta']

                # acumulado
                registro[cual]['SumaRssi'][0] = registro[cual]['SumaRssi'][0]+rssi_tx
                registro[cual]['SumaSnr'][0]  = registro[cual]['SumaSnr'][0]+snr_tx
                registro[cual]['SumaRssi'][1] = registro[cual]['SumaRssi'][1]+rssi_rx
                registro[cual]['SumaSnr'][1]  = registro[cual]['SumaSnr'][1]+snr_rx

                # promedios
                cuantos = registro[cual]['cuenta']
                registro[cual]['rssi'] = registro[cual]['SumaRssi']/cuantos
                registro[cual]['snr']  = registro[cual]['SumaSnr']/cuantos

                # minimos y maximos
                registro[cual]['minmaxRssi'][0] = np.min([rssi_tx,registro[cual]['minmaxRssi'][0]])
                registro[cual]['minmaxRssi'][1] = np.max([rssi_tx,registro[cual]['minmaxRssi'][1]])
                registro[cual]['minmaxRssi'][2] = np.min([rssi_rx,registro[cual]['minmaxRssi'][2]])
                registro[cual]['minmaxRssi'][3] = np.max([rssi_rx,registro[cual]['minmaxRssi'][3]])

                registro[cual]['minmaxSnr'][0] = np.min([snr_tx,registro[cual]['minmaxSnr'][0]])
                registro[cual]['minmaxSnr'][1] = np.max([snr_tx,registro[cual]['minmaxSnr'][1]])
                registro[cual]['minmaxSnr'][2] = np.min([snr_rx,registro[cual]['minmaxSnr'][2]])
                registro[cual]['minmaxSnr'][3] = np.max([snr_rx,registro[cual]['minmaxSnr'][3]])

            # Muestra en pantalla el estado de recepción
            print('\n difusion: ',difunde)
            print(texto)
            for elemento in baliza:
                print(elemento,registro[elemento]['cuenta'],
                      '\tprom Rssi[tx,rx] \t   Snr[tx,rx]')
                print("prom   :",registro[elemento]['rssi'],"\t  ",
                      registro[elemento]['snr'])
                print("min,max:",registro[elemento]['minmaxRssi'],
                      registro[elemento]['minmaxSnr'])

# Cerrar el puerto serial.
serial.Serial.close

2.1 Captura datos. Balizas y dispositivo – configuración algoritmo.ino

Instrucciones para el dispositivo en Arduino IDE

El esquema para baliza y dispositivo propuesto para el modelo de localización usa el modelo multipunto de LoRa que usa direcciones para identificar la función de cada elemento:

  • Baliza: d1,d2,d3
  • Dispositivo: c1

El esquema se muestra simplificado para un solo punto, se plantea usar el dispositivo ‘C1’ como punto de captura de datos hacia un archivo tipo texto mediante la conexión USB a un computador portatil.

En el dispositivo, por cada paquete recibido se toman los datos del paquete y valores medidos, creando un registro de trama con: el tipo rx/tx, id receptor, remitente, los datos recibidos y lecturas de RSSI y SNR del paquete recibido desde el remitente que es cada baliza.

    rssi_lorarx = LoRa.packetRssi();
    snr_lorarx = LoRa.packetSnr();

Registro de la trama de datos

El registro de la trama de datos recibida en el computador se compone de la parte de datos recibido y las lecturas de Rssi-SNR del paquete. El orden de los datos se muestra en la tabla:

esquema de trama de datos
 tipo receptor remitente dato1 dato2 dato3 Rssi recibido SNR recibido
rx, tx c1, ff d1, d2, d3 medido en el dispositivo medido en el dispositivo

Ejemplo de trama recibida:

rx,c1,d3,36,-62,6.00,-65,6.00
tx,ff,c1,2,-65,6.00,-65,6.00
rx,c1,d2,21,-130,6.00,-130,6.00
rx,c1,d1,138,-98,18.75,-131,10.25

Para obtener los valores de Rssi y SNR de recepción desde cada baliza, se emite periódicamente un paquete de difusión (‘ff’) desde el dispositivo c1. Los valores recibidos en la baliza se replican en los datos del próximo paquete de la baliza hacia el dispositivo c1, que corresponden a dato2 y dato3.

Para revisar la secuencia del paquete se registra un contador desde el emisor, enviado en la posición de dato1.

Configurar la función de baliza o dispositivo

se  establece mediante las direcciones de envío y recepción descritas en la sección principal del algoritmo.

Para el dispositivo la dirección local es C1 , para las balizas serán D1, D2, D3.

En el dispositivo se usa la dirección local ‘C1’, y como destino una trama de difusión ‘FF’ hacia todas las balizas de tal manera que cada baliza pueda medir el nivel de recepción de la señal emitida desde el dispositivo.

// Direcciones Enviar mensaje
byte dir_local   = 0xC1; // Concentrador 1
byte dir_destino = 0xFF; // Broadcast para medir Rssi
byte msjtxContador = 0;

En las balizas,  la dirección local de la baliza es D1, D2, D3, y la dirección destino es el dispositivo.

// Direcciones Enviar mensaje
byte dir_local   = 0xD1; // Baliza 1
byte dir_destino = 0xC1; // Dispositivo

Otros parámetros como tiempo entre paquetes, se configuran de acuerdo a las lecturas que se tomarán en un intervalo de tiempo. El parámetro t_ciclotx establece el intervalo de tiempo en que cada dispositivo o baliza emite un paquete.

Para LoRa, los tiempos de envio de paquetes son bastante largos de acuerdo al diseño básico de la red estándar, sin embargo durante el experimiento para tomar las lecturas más rápido en cada ubicación de prueba se puede reducir a por ejemplo, 10 segundos (10000ms)

int  t_ciclotx =10000;

otros detalles de configuración del dispositivo se pueden revisar en la sección de referencias al final de la hoja.


Módulos LoRa

El prototipo se implentó con los módulos de desarrollo Heltec Lora 32 V2 disponibles al momento de las pruebas. Los módulos son de 915MHz, y se usaron también con las pruebas de conexión multipunto descritas en LoRa Multipunto – Esquema


Instrucciones en Arduino

Las instrucciones del dispositivo escritas usando el IDE Arduino se presentan en secciones o bloques:

  • Principal: LoRa_Listener02
  • Receptor: LoRaReceptor
  • Transmisor: LoRaTransmisor
  • Sensor: Sensores


Sección principal

/* Pruebas de Rssi y SNR multipunto, esquema de triangulación
  Nodo- Receptor. http://blog.espol.edu.ec/girni/
  Septiembre-2020 */
#include "heltec.h"

// SENSOR Parpadeo
String sensorBlink = "ON"; // inicializa on/off: 1/0

// Direcciones Enviar mensaje
byte dir_local   = 0xC1; // Concentrador 1
byte dir_destino = 0xFF; // Broadcast para medir Rssi
byte msjtxContador = 0;
int  t_ciclotx = 10000;
long t_anterior = 0;
int  t_intervalo = 3000;

// Direcciones Mensaje Recibido
byte dir_envio = 0xC1;
int dir_remite = 0xFF; 
String paqueteRcb = "";
byte   paqrcbID = 0;
byte   paqrcbEstado = 0;
       // 0:vacio, 1: nuevo, 2:incompleto
       // 3:otro destinatario, 4:Broadcast

int  rssi_lorarx = 0;
float snr_lorarx = 0;

// Mensajes por Puerto Serial
volatile boolean serial_msj = true;

#define BAND    915E6  // 868E6,915E6

void setup() {
  Heltec.begin(false /*DisplayEnable Enable*/,
               true /*Heltec.LoRa Disable*/,
               serial_msj /*Serial Enable*/,
               true /*PABOOST Enable*/,
               BAND /*long BAND*/);
  LoRa.setSpreadingFactor(8);
  LoRa.receive();
}

void loop() {

  // LoRa enviar mensajes entre intervalos
  long t_ahora = millis();
  long t_transcurrido = t_ahora - t_anterior;
 
  if (t_transcurrido >= t_intervalo){
    t_anterior = t_ahora;
    t_intervalo = t_ciclotx + random(1000);
    
    // sensorParpadea(); //actualiza sensor
    sensorBlink = String(rssi_lorarx)+","+String(snr_lorarx);
    
    String paqueteEnv = String(sensorBlink).c_str() ;
    enviarlora(dir_destino, dir_local,
               msjtxContador, paqueteEnv);
    yield();

    // mensaje a serial
    if (serial_msj==true){
      // muestra todos paqrcbEstado
      Serial.print("tx,");
      Serial.print(String(dir_destino,HEX)+",");
      Serial.print(String(dir_local,HEX)+",");
      Serial.print(String(msjtxContador)+",");
      Serial.print(String(paqueteEnv)+",");
      Serial.print(String(rssi_lorarx)+",");
      Serial.println(snr_lorarx);
    }
    
    msjtxContador = msjtxContador + 1;
    
    // LED parpadea envio LoRa
    digitalWrite(LED, HIGH); delay(100);
    digitalWrite(LED, LOW);  delay(100);
    yield(); // procesa wifi
  }

  // LoRa revisar mensajes entrantes
  int msjRcbLoRa = LoRa.parsePacket();
  if (msjRcbLoRa !=0){ //¿mensaje no vacio?
    recibirlora(msjRcbLoRa);
    rssi_lorarx = LoRa.packetRssi();
    snr_lorarx = LoRa.packetSnr();
    
    if (serial_msj==true){
      // muestra todos los tipos
      //Serial.print("Paquete recibido, Estado: ");
      //Serial.println(paqrcbEstado);
      Serial.print("rx,");
      Serial.print(String(dir_envio,HEX)+",");
      Serial.print(String(dir_remite,HEX)+",");
      Serial.print(String(paqrcbID)+",");
      Serial.print(String(paqueteRcb)+",");
      Serial.print(String(rssi_lorarx)+",");
      Serial.println(String(snr_lorarx));
    }
    yield(); // procesa wifi
  }
}

Sección Receptor

En esta sección se revisa la trama, separando cada una de las partes del paquete recibido: dirección de envío, dirección de remitente, identificador del paquete generado por un contador de secuencia.

Se verifica que el destinatario del paquete, si el tamaño de la trama indica que el mensaje está completo, si la trama es de difusión (broadcast) usada para registrar los niveles de recepción.

void recibirlora(int tamano){
  if (tamano == 0){ 
    paqrcbEstado = 0; //vacio
    return;
    }
    
  // lectura de paquete
  paqueteRcb = "";
  dir_envio = LoRa.read();
  dir_remite  = LoRa.read();
  paqrcbID = LoRa.read();
  byte paqrcbTamano = LoRa.read();
  while(LoRa.available()){
    paqueteRcb += (char)LoRa.read();
  }
  if (paqrcbTamano != paqueteRcb.length()){
    paqrcbEstado = 2; // Tamaño incompleto
    return;
  }
  if (dir_envio != dir_local){
    if (dir_envio == 0xFF) {
      paqrcbEstado = 4; // Broadcast
    }else{
      paqrcbEstado = 3; // otro destino
    }
    return;
  }
  paqrcbEstado = 1;  // mensaje Nuevo
}

Sección de transmisor

En esta sección se verifica que el canal no se encuentre ocupado o que el dispositivo este listo para transmitir.

Se arma el paquete a enviar y se transmite.

void enviarlora(byte destino, byte remite,
                byte paqueteID, String paquete) {
  // espera que el radio esté listo
  // para enviar un paquete
  while(LoRa.beginPacket() == 0){
    if (serial_msj==true){
      Serial.println("Esperando radio disponible...");
    }
    yield(); // procesa wifi
    delay(100);
  }
  // envio del mensaje LoRa
  LoRa.beginPacket();
  LoRa.write(destino);
  LoRa.write(remite);
  LoRa.write(paqueteID);
  LoRa.write(paquete.length());
  LoRa.print(paquete);
  LoRa.endPacket();
}

Sección Sensor

La sección del sensor no es requerida para el registro de Rssi y SNR, por lo que se simula con un parpadeo de LED.

// Sensor Simulado
void sensorParpadea(){
    if (sensorBlink == "ON"){
      sensorBlink = "OFF";
    }else{
      sensorBlink = "ON";
    }
   return;
}

Referencias: LoRa Multipunto – Esquema

1. Localización Rssi – Esquema de trabajo

En el escenario inicial básico, se plantea disponer de un dispositivo LoRa básico que se conecta a varios gateways LoRa. Desde cada paquete recibido se toman los valores Rssi y SNR en cada medición realizada en áreas de diferentes característica o entornos dentro del campus ESPOL.

Siendo el dispositivo usado de tipo básico, no dispone de un módulo GPS o elementos adicionales para localización.

Un dispositivo LoRa puede estar ubicado en áreas del campus de diferente entorno, por ejemplo, vegetación o edificios, a diferentes alturas por la irregularidad del terreno.

Las condiciones del entorno en cada área presentan varios escenarios a los modelos de espacio libre.

Un sensor general implementado con un dispositivo LoRa al transmitir puede añadir al envio de su estado las lecturas de Rssi y SNR  tomadas de los paquetes recibidos desde un gateway. En sengido opuesto, un gateway al recibir un paquete transmitido desde un sensor puede registrar lecturas de Rssi y SNR de recepción. De existir varios gateways, al menos tres, un dispositivo al transmitir datos  permitiría estimar su ubicación relativa a cada uno usando las lecturas recibidas.

Esquema de Prototipo

Para el esquema inicial de prototipo, se simplifica usando mediciones LoRa punto multipunto usando módulos básicos. En una segunda fase se podría ampliar a LoRaWAN usando esquemas abiertos de gateways.

Para el planteamiento del modelo, se realizan mediciones en varios puntos en las áreas de interes, marcando cada uno de ellos un mapa.  Las referencias en el mapa se mejoran usando las coordenadas tomadas con un GPS Diferencial que tiene una mayor precisión que un GPS básico dados los diferentes entornos en el campus.

En las siguientes secciones de describen los pasos realizados para realizar un modelo que permita estimar la ubicación de un dispositivo en diferentes áreas.

Para realizar el prototipo planteado se desarrollan dos partes principales:

Captura de datos para el modelo de pérdidas en propagación LoRa

Procesamiento de datos para el modelo de pérdidas en propagación LoRa