Multivariate analysis and preprocessing of spectral data: [BE,I]=vms_sp_read_casa(filename,pl); - File Exchange

Code covered by the BSD License

Highlights from
Multivariate analysis and preprocessing of spectral data

spectral_mva(varargin) SPECTRAL_MVA M-file for spectral_mva.fig
[BE,I]=vms_sp_read(filename,p... function [BE,I]=vms_sp_read(filename,pl);
[BE,I]=vms_sp_read_casa(filen... function [BE,I]=vms_sp_read_casa(filename,pl);
[X_sh, sp_sh]=shift_spectra_d... function [X_sh, sp_sh]=shift_spectra_diff(spectra, X);
[purspec,purint,purity_spec]=... function [purspec,purint,purity_spec]=simplisma(data,varlist,offset,n,data2);
[x_sh, y_sh]=shift_spectra(sp...
[x_sh, y_sh]=shift_spectra_or... function [x_sh, y_sh]=shift_spectra_or(spectra, X,C);
data_der=invder(data) data_der=invder(data)
indd=match(x,y, tol,bro)
reverplot(BE,I) script to plot binding energy BE axis in reverse order
uigetfiles.m
View all files

from Multivariate analysis and preprocessing of spectral data by Kateryna Artyushkova
GUI for MVA of spectral data including various preprocessing options and three types of MVA analysis

[BE,I]=vms_sp_read_casa(filename,pl);

function [BE,I]=vms_sp_read_casa(filename,pl);
% function [BE,I]=vms_sp_read_casa(filename,pl);
%
% function for reading Kratos spectral VMS files into two vectors
% BE - binding energy scale
% I - intensity values
% pl=1 - the spectra will be plotted
%
% example:
% [X1,C1]=vms_sp_read_casa('s_C_1s_1.vms',0);
%
% Written by K. Artyushkova

% Kateryna Artyushkova
% Postdoctoral Scientist
% Department of Chemical and Nuclear Engineering
% The University of New Mexico
% (505) 277-0750
% kartyush@unm.edu 
% 
% 11/13/2003


n = textread(filename,'%f',1,'delimiter','.','headerlines',71); % number of points in spectrum
I = textread(filename,'%f',n,'delimiter','.','headerlines',74); % vector of intensity values


PhE = textread(filename,'%f',1,'delimiter','.','headerlines',38); % Photon Kinetic energy
KEstart = textread(filename,'%f',1,'delimiter','.','headerlines',58); % start Kineting energy
BEstart=PhE-KEstart; % start Binding energy

step = textread(filename,'%f',1,'delimiter','.','headerlines',59); %scanning step in eV
BEend=BEstart-n*step+step; % end Binding energy
BE=[BEstart:-step:BEend]; % vector of Binding energy
BE=BE';

%displaying image
if pl==1
plot(BE,I)
set(gca,'Xdir','reverse')
end

Highlights from Multivariate analysis and preprocessing of spectral data

Highlights from
Multivariate analysis and preprocessing of spectral data