function ppi_wrapper(regionnumber,firstsubject,lastsubject)

%User input required (directories and subjects)
addpath('/Users/signy/Documents/MATLAB/PPPIv13.1/PPPIv13/')
addpath('/Users/signy/Documents/MATLAB/spm12/')
Subjects={'101'};

%User input required (region files)
regionfile={'/Volumes/UNTITLED/Fluency_2015/gPPI/Fluency_hippocampal_ROIs/group_average_Left_head.nii'};

%User input required (region names)
region={'Average_Left_head'};

%User input required (master template)
load('/Volumes/UNTITLED/Fluency_2015/gPPI/ppi_master_template.mat')

P.VOI=regionfile{regionnumber};
P.Region=region{regionnumber};

%User input required (change directory to where the input structure should
%be saved)
save(['/Volumes/UNTITLED/Fluency_2015/101/HRF/' region{regionnumber} '.mat'],'P');

for i=firstsubject:lastsubject;
    try
        %User input required directory of SPM.mat files
        Directory=['/Volumes/UNTITLED/Fluency_2015/101/HRF/'];
        cd(Directory)
        
        %User input required (directory same as line 23 above)
        load(['/Volumes/UNTITLED/Fluency_2015/101/HRF/' region{regionnumber} '.mat']);
        
        P.subject=Subjects{i};
        P.directory=Directory;
        
        %User input required (change analysis to be more specific)
        save([Subjects{i} '_analysis_' region{regionnumber} '.mat'],'P');
        PPPI([Subjects{i} '_analysis_' region{regionnumber} '.mat']);
    catch
        disp(['Failed: ' Subjects{i}])
    end
end
end