PROFILE WITH 
    
    500   AS nb_persons,          
    500  AS min_pings,           
    500 AS max_pings,           
    datetime('2024-01-01T00:00:00') AS start_date, 
    7 * 24 * 60 * 60 AS time_window_sec, 
    
    
    48.80 AS lat_min, 48.90 AS lat_max,
    2.25 AS lon_min, 2.40 AS lon_max
    


UNWIND range(1, nb_persons) AS i
WITH i, min_pings, max_pings, start_date, time_window_sec, lat_min, lat_max, lon_min, lon_max,
     rand() AS r_dev_distro


WITH i, min_pings, max_pings, start_date, time_window_sec, lat_min, lat_max, lon_min, lon_max,
     CASE 
        WHEN r_dev_distro < 0.90 THEN 1 
        WHEN r_dev_distro < 0.97 THEN 2 
        ELSE 3 
     END AS num_devices

CREATE (p:Person {
    name: "Suspect_" + tostring(rand()), 
    dataset_batch: start_date        
})


WITH p, num_devices, min_pings, max_pings, start_date, time_window_sec, lat_min, lat_max, lon_min, lon_max
UNWIND range(1, num_devices) AS d_idx
CREATE (d:Device {
    imei: "IMEI_" + split(p.name, '_')[1] + "_" + d_idx,
    num:  "06" + toInteger(rand() * 89999999 + 10000000)
})
CREATE (p)-[:OWNS]->(d)


WITH d, min_pings, max_pings, start_date, time_window_sec, lat_min, lat_max, lon_min, lon_max,
     toInteger(rand() * (max_pings - min_pings) + min_pings) AS nb_pings_target


UNWIND range(1, nb_pings_target) AS p_idx
WITH d, start_date, time_window_sec, lat_min, lat_max, lon_min, lon_max,
     rand() AS r_lat, rand() AS r_lon, rand() AS r_time

CREATE (ping:Ping {
    
    location: point(
         r_lat * (lat_max - lat_min) + lat_min,
        r_lon * (lon_max - lon_min) + lon_min
    ),
    
    time: start_date + duration({seconds: toInteger(r_time * time_window_sec)})
})
CREATE (d)-[:GENERATED]->(ping)

PROFILE WITH 
    
    500   AS nb_persons,  
.........
.........
.........