Hi @Joaomatos2002 ,
Not sure I understand your question. Please check the M code below:
let
Source = Table.FromRows(Json.Document(Binary.Decompress(Binary.FromText("hdRLjsMgEATQq4y8TiZU82c3cwpLke9/jQEmUtmQNF5YuCz1E79+Pref7bbt9blfXztC+4H6Ah4mPcSIu3x8GVs8hsgVIzVy+DbtqcN7eg2Pm4K1XDSrFo5ThEgLtKBajdmtbkmeIp9pCS1RrcbsTrNCwWiF4hwtS8uqlltasdhxDVOBoeVouW79frB8y4Nu+TFKxSdanpZX5xWWVno3L3eaV6AVVKuV2aNu9cLnKBfnaUVaUV3DthZ9IT9ZSMWEKbKn+5VoJdXKPdcm1irbKfKBWCaWVayfqBXmhx1DLpanHuwcMDrWW0fWsFrZT9HpOoOtA9AxWfUpMcVgigTE2DsgOmZXjapVHvZM8H8XXhibB/Tmgd49ko6NeyZSDG8Z2D3gdMyv9qxVHmcmlwPC9lGHx/EH", BinaryEncoding.Base64), Compression.Deflate)), let _t = ((type nullable text) meta [Serialized.Text = true]) in type table [ID_CARD = _t, ID_ACTIVITY = _t, ID_LOCATION = _t, CALDAY = _t, STARTTIME = _t, ENDTIME = _t, latitude = _t, longitude = _t]),
#"Changed Type" = Table.TransformColumnTypes(Source,{{"STARTTIME", type datetime}, {"ENDTIME", type datetime}, {"latitude", type number}, {"longitude", type number}}),
#"Sorted Rows" = Table.Sort(#"Changed Type",{{"ID_CARD", Order.Ascending}, {"ENDTIME", Order.Ascending}}),
#"Added Index" = Table.AddIndexColumn(#"Sorted Rows", "Index", 1, 1, Int64.Type),
AddPreviousIndex = Table.AddColumn(#"Added Index", "PreviousIndex", each [Index] - 1),
MergedQueries = Table.NestedJoin(AddPreviousIndex, {"ID_CARD", "PreviousIndex"}, AddPreviousIndex, {"ID_CARD", "Index"}, "PreviousRow", JoinKind.LeftOuter),
ExpandedTable = Table.ExpandTableColumn(MergedQueries, "PreviousRow", {"latitude", "longitude"}, {"Prev_latitude", "Prev_longitude"}),
AddDistanceColumn = Table.AddColumn(ExpandedTable, "Distance_km", each
let
lat1 = [latitude] * Number.PI / 180,
lon1 = [longitude] * Number.PI / 180,
lat2 = [Prev_latitude] * Number.PI / 180,
lon2 = [Prev_longitude] * Number.PI / 180,
dlat = lat2 - lat1,
dlon = lon2 - lon1,
a = Number.Sin(dlat / 2) * Number.Sin(dlat / 2) + Number.Cos(lat1) * Number.Cos(lat2) * Number.Sin(dlon / 2) * Number.Sin(dlon / 2),
c = 2 * Number.Atan2(Number.Sqrt(a), Number.Sqrt(1 - a)),
R = 6371, // Radius of Earth in kilometers
distance = R * c
in
distance
),
#"Removed Columns" = Table.RemoveColumns(AddDistanceColumn,{"Index", "PreviousIndex", "Prev_latitude", "Prev_longitude"})
in
#"Removed Columns"
If I have misunderstood your question, please feel free to contact me.
Best Regards,
Gao
Community Support Team
If there is any post helps, then please consider Accept it as the solution to help the other members find it more quickly.
If I misunderstand your needs or you still have problems on it, please feel free to let us know. Thanks a lot!
How to get your questions answered quickly -- How to provide sample data in the Power BI Forum
Hi @Joaomatos2002 ,
Not sure I understand your question. Please check the M code below:
let
Source = Table.FromRows(Json.Document(Binary.Decompress(Binary.FromText("hdRLjsMgEATQq4y8TiZU82c3cwpLke9/jQEmUtmQNF5YuCz1E79+Pref7bbt9blfXztC+4H6Ah4mPcSIu3x8GVs8hsgVIzVy+DbtqcN7eg2Pm4K1XDSrFo5ThEgLtKBajdmtbkmeIp9pCS1RrcbsTrNCwWiF4hwtS8uqlltasdhxDVOBoeVouW79frB8y4Nu+TFKxSdanpZX5xWWVno3L3eaV6AVVKuV2aNu9cLnKBfnaUVaUV3DthZ9IT9ZSMWEKbKn+5VoJdXKPdcm1irbKfKBWCaWVayfqBXmhx1DLpanHuwcMDrWW0fWsFrZT9HpOoOtA9AxWfUpMcVgigTE2DsgOmZXjapVHvZM8H8XXhibB/Tmgd49ko6NeyZSDG8Z2D3gdMyv9qxVHmcmlwPC9lGHx/EH", BinaryEncoding.Base64), Compression.Deflate)), let _t = ((type nullable text) meta [Serialized.Text = true]) in type table [ID_CARD = _t, ID_ACTIVITY = _t, ID_LOCATION = _t, CALDAY = _t, STARTTIME = _t, ENDTIME = _t, latitude = _t, longitude = _t]),
#"Changed Type" = Table.TransformColumnTypes(Source,{{"STARTTIME", type datetime}, {"ENDTIME", type datetime}, {"latitude", type number}, {"longitude", type number}}),
#"Sorted Rows" = Table.Sort(#"Changed Type",{{"ID_CARD", Order.Ascending}, {"ENDTIME", Order.Ascending}}),
#"Added Index" = Table.AddIndexColumn(#"Sorted Rows", "Index", 1, 1, Int64.Type),
AddPreviousIndex = Table.AddColumn(#"Added Index", "PreviousIndex", each [Index] - 1),
MergedQueries = Table.NestedJoin(AddPreviousIndex, {"ID_CARD", "PreviousIndex"}, AddPreviousIndex, {"ID_CARD", "Index"}, "PreviousRow", JoinKind.LeftOuter),
ExpandedTable = Table.ExpandTableColumn(MergedQueries, "PreviousRow", {"latitude", "longitude"}, {"Prev_latitude", "Prev_longitude"}),
AddDistanceColumn = Table.AddColumn(ExpandedTable, "Distance_km", each
let
lat1 = [latitude] * Number.PI / 180,
lon1 = [longitude] * Number.PI / 180,
lat2 = [Prev_latitude] * Number.PI / 180,
lon2 = [Prev_longitude] * Number.PI / 180,
dlat = lat2 - lat1,
dlon = lon2 - lon1,
a = Number.Sin(dlat / 2) * Number.Sin(dlat / 2) + Number.Cos(lat1) * Number.Cos(lat2) * Number.Sin(dlon / 2) * Number.Sin(dlon / 2),
c = 2 * Number.Atan2(Number.Sqrt(a), Number.Sqrt(1 - a)),
R = 6371, // Radius of Earth in kilometers
distance = R * c
in
distance
),
#"Removed Columns" = Table.RemoveColumns(AddDistanceColumn,{"Index", "PreviousIndex", "Prev_latitude", "Prev_longitude"})
in
#"Removed Columns"If I have misunderstood your question, please feel free to contact me.
Best Regards,
Gao
Community Support Team
If there is any post helps, then please consider Accept it as the solution to help the other members find it more quickly.
If I misunderstand your needs or you still have problems on it, please feel free to let us know. Thanks a lot!
How to get your questions answered quickly -- How to provide sample data in the Power BI Forum
Helpful resources
Power BI Dataviz World Championships
The Power BI Data Visualization World Championships is back! Get ahead of the game and start preparing now!
Power BI Monthly Update - December 2025
Check out the December 2025 Power BI Holiday Recap!
FabCon Atlanta 2026
Join us at FabCon Atlanta, March 16-20, for the ultimate Fabric, Power BI, AI and SQL community-led event. Save $200 with code FABCOMM.
