SetDirectory["/home/alex/Programming/esp/uas-ugv"]

data=Import["ugv2_rest.csv",HeaderLines->1];
magdata=data[[All,7;;9]];

plotdata[data_]:=ListPlot[{data[[All,1;;2]],data[[All,2;;3]],Transpose[{data[[All,3]],data[[All,1]]}]},AspectRatio->1]

plotdata[magdata]

maghalfs={118.9015885,-18.8173395,39.2090355}

magdata2=#-maghalfs&/@magdata;
plotdata[magdata2]

magranges={30.2876665`,29.7628835`,29.762880499999998`}
1/magranges

magdata3=#/magranges&/@magdata2;
plotdata[magdata3]

Norm/@magdata3;
Histogram[%]

Graphics3D[Point/@magdata3,]