function [RMSdata] = rmsA(data)
RMSdata = sqrt(mean((data(:,:).^2),2));
end