Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
25 changes: 20 additions & 5 deletions src/pspm_rev_dcm.m
Original file line number Diff line number Diff line change
Expand Up @@ -81,8 +81,8 @@
y = dcm.sn{sn}.y(:);
yhat = dcm.sn{sn}.yhat(:);
f.h = figure('Position', [50 50 750 750], 'PaperPositionMode', 'auto', 'PaperOrientation', 'Portrait', 'InvertHardCopy', 'off', 'Color', 'w', 'Name', 'Session summary');
foo = ceil(sqrt(trlno));
f.r = foo; f.c = ceil(trlno/foo);
foo = ceil(sqrt(trlno+1)); % +1 for the dummy plot
f.r = foo; f.c = ceil((trlno+1)/foo); % +1 for the dummy plot
sr = 10;
for n = 1:trlno
if n < trlno
Expand All @@ -98,9 +98,22 @@
set(gca, 'XTickLabel', xt / dcm.input.sr);
set(gca, 'YLim', [min(yhat), max(yhat)]);
end
% display scrf

idx = trlno + 1;
subplot(f.r, f.c, idx);
cla;

%—— hide top/right spines, keep bottom/left ticks but no numbers
set(gca, 'Box','off', 'XTickMode','auto', 'XTickLabel', [], ...
'YTickMode','auto', 'YTickLabel',[], 'FontSize',8);
set( get(gca,'XLabel'), 'String','Time (s)', ...
'FontSize',8, 'Units','normalized', 'Position',[0.5, 0.20, 0], 'Visible','on');
set( get(gca,'YLabel'), 'String','SCR ', ...
'FontSize',8, 'Units','normalized', 'Position',[0.20, 0.5, 0], 'Visible','on');

% display scrf
% ---------------------------------------------------------------------
case 'scrf'
case 'scrf'
xt = zeros(1, 7);
ut = 0:0.1:30;% time
ut(2, :) = 0; % aSCR
Expand All @@ -114,8 +127,10 @@
xt(x + 1, :) = f_SCR(xt(x, :), Theta, ut(:, x), in);
end
figure; plot(xt(:, 1));
set(gca, 'YTick', [], 'XTick', 0:50:300, 'XTickLabel', 0:5:30, 'FontWeight', 'Bold', 'FontSize', 12);
set(gca, 'YTickMode', 'auto', 'XTick', 0:50:300, 'XTickLabel', 0:5:30,'XLim', [0 300], 'FontWeight', 'Bold', 'FontSize', 12);
set(get(gca, 'Title'), 'String', 'Skin conductance response function', 'FontWeight', 'Bold', 'FontSize', 16);
set(get(gca, 'XLabel'), 'String', 'Time (s)', 'FontWeight', 'Bold', 'FontSize', 12)
set(get(gca, 'YLabel'), 'String', 'Skin conductance (\muS)', 'FontWeight', 'Bold','FontSize', 12);
case 'names'
fprintf('Trial names for %s:\n---------------------------------------\n', dcm.dcmname);
for n=1:numel(dcm.trlnames)
Expand Down
Binary file modified src/pspm_review_App.mlapp
Binary file not shown.