nass-micro-station-measurem.../Spindle/Macros_ttt_spindle/Spindle.m

33 lines
971 B
Mathematica
Raw Normal View History

2019-03-14 16:40:28 +01:00
clear; close all; clc;
%%
datapath = './data/';
savepath = './Macros_ttt_spindle/';
name_of_the_datafile = '10turns_60rpm_IcepapFIR.txt';
NbTurn = 10; % Be careful that this value match with the measure
%%
% [y, x, z, y2, x2] = importfile(fullfile(datapath,name_of_the_datafile),12, inf);
spindle_table = readtable([datapath, name_of_the_datafile]);
data = table2array(spindle_table);
% data = [y x z y2 x2];
data = data(:, 3:end);
texte = {'Y Axis' 'X Axis' 'Z Axis' 'Y2 Axis' 'X2 Axis'};
texte2 = {'Rotating radial Error XY' 'Rotating radial Error X2Y2' 'Tilt Error XX2' 'Tilt Error YY2' };
%%
for i = 1:5
Spindle_error(data(:,i), NbTurn, texte(:,i), savepath);
end
%%
Dual_Spindle_error(data(:,2), data(:,1),NbTurn,texte2(:,1), savepath);
Dual_Spindle_error(data(:,5), data(:,4),NbTurn,texte2(:,2), savepath);
Tilt_Spindle_error(data(:,2), data(:,5),NbTurn,texte2(:,3), savepath);
Tilt_Spindle_error(data(:,1), data(:,4),NbTurn,texte2(:,4), savepath);