function isicorr = plotisiserialcorr(isivec, maxlag)
% plot serial correlation of interspike intervals
%
% plotisiserialcorr(isivec, maxlag)
%
% Arguments:
%   isivec: vector of interspike intervals in seconds
%   maxlag: the maximum lag
    [isicorr, lags] = isiserialcorr(isivec, maxlag);
    plot(lags, isicorr, '-b');
    hold on;
    scatter(lags, isicorr, 20.0, 'b', 'filled');
    hold off;
    xlabel('Lag k')
    ylabel('\rho_k')
end