accHUAWEI29m.xlsx

x={-9.549832987,
10.14496219,
0.413309375,
0.368766406,
0.51029168,
0.23183437,
0.230218747,
0.304597844,
-0.6120114,
-0.741094639,
8.345166212,
7.903559705,
-7.216437671,
-7.537670359,
0.359915288,
0.069260676,
0.491483606,
0.042524175,
-1.000274975,
1.764999819,
-1.902239264,
2.794601899,
-6.090046342,
-6.126144065,
-5.179076327,
-6.400252322,
-2.752668177,
-7.35003855,
-5.076212053
};
y={0.378289508,
0.314528006,
-9.476405892,
10.14421174,
0.338026062,
0.48218639,
7.857285751,
8.055402663,
-7.073907695,
-7.065702822,
-1.001714169,
-1.011209966,
-0.678395609,
-0.887222579,
1.368313168,
1.566944302,
-0.827213993,
-0.80292728,
0.562195881,
0.425372239,
7.049996055,
7.320337224,
-5.892884847,
-2.402660943,
-5.641094739,
7.412499399,
7.192834358,
-2.930268845,
5.316678878};
z={-0.999283057,
-1.377890861,
-1.620758817,
-0.910231659,
-10.78512368,
8.605530158,
5.098360324,
-7.093515773,
-7.399078028,
5.226674899,
4.350233726,
-7.159353126,
5.069950551,
-6.845101375,
8.554303268,
-10.70576799,
8.558524589,
-10.71197326,
-10.69610339,
8.516811066,
5.607305745,
-7.461489372,
2.999875978,
-7.914766219,
4.398763131,
0.119649114,
5.108520974,
-6.29041613,
-7.626808169
};
Do[(Subscript[A, i])={{x[[i]]},{y[[i]]},{z[[i]]}},{i,1,29}];

accGT27m.xlsx

x={0.686143985,
0.307313184,
10.20588166,
-9.235730337,
0.277144172,
0.652333397,
2.819218128,
-1.006468208,
10.10396889,
-1.605962585,
0.246794337,
0.706211903,
7.728566894,
2.053861069,
5.742237957,
1.604557037,
1.029262184,
0.041407842,
2.730162016,
-2.924918942,
-2.924918942,
10.18267071,
3.908533423,
-4.59854197,
-1.674747469,
10.04636598,
7.685992297
};

y={9.693013241,
-9.555131822,
0.146627372,
0.149835656,
-0.108499369,
0.026782191,
0.00984892,
0.586054944,
0.089937928,
0.058272144,
1.126126555,
-3.139230967,
0.248629672,
-2.927665847,
0.041531765,
0.951821853,
1.996550095,
-2.516368282,
-8.137597633,
-6.411393964,
-6.411393964,
0.144573621,
-8.83618239,
-8.151722848,
9.466063897,
1.799748205,
6.529638446
};

z={0.146230973,
0.121707371,
0.293913142,
-0.153514714,
9.72381854,
-9.867581581,
9.453752615,
9.610065897,
-1.625049867,
-9.639987664,
9.709396155,
-9.302827738,
6.471431237,
9.11283197,
8.152279472,
-9.754449668,
9.543562547,
9.358991009,
-4.711984149,
6.335544161,
6.335544161,
0.312617999,
-1.558956159,
0.065404421,
0.036135226,
0.246702889,
0.083514447
};
Do[(Subscript[A, i])={{x[[i]]},{y[[i]]},{z[[i]]}},{i,1,27}];