clear all

ExprData=importdata('Data.txt');

for i=1:numel(ExprData(:,1))
    ExprData(i,:)=ExprData(i,:)-mean(ExprData(i,:));
end


%output centered data
FID_SD_C=fopen('Out.txt', 'w');

for i=1:numel(ExprData(:,1))
    fprintf(FID_SD_C, '%f\t', ExprData(i,:));
    fprintf(FID_SD_C, '\n');
end

fclose(FID_SD_C);