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/PPPIv13.1/')
addpath('/Users/signy/Documents/MATLAB/spm12/')
Subjects={ '104' '102' '103' '104' '105' '106' '107' '108' '109' '111' '112' '113' '114' '115' '116' '117'};

%User input required (region files)
regionfile={ '/Volumes/UNTITLED/Fluency_2015/gPPI/Fluency_hippocampal_ROIs/Conjunction_Spa_Auto_-26_-34_-11.nii' '/Volumes/UNTITLED/Fluency_2015/gPPI/Fluency_hippocampal_ROIs/Conjunction_Spa_Auto_28_-31_-12.nii'};

%User input required (region names)
region={'Conjunction_Spa_Auto_-26_-34_-11' 'Conjunction_Spa_Auto_28_-31_-12'};

%User input required (master template)
load('/Volumes/UNTITLED/Fluency_2015/gPPI/ppi_fluency_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/gPPI/Fluency_hippocampal_ROIs/' region{regionnumber} '.mat'],'P');

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