


Multi-taper triggered time-frequency spectrum - point process times
Usage:
[S,t,f,R,Serr]=mtspecgramtrigpt(data,E,win,movingwin,tapers,pad,Fs,fpass,err,trialave,fscorr)
Input:
data (structure array of spike times with dimension channels/trials; also accepts 1d array of spike times) -- required
E (event times) - required
win (in the form [winl,winr] i.e window around each event
required
movingwin (in the form [window winstep] i.e length of moving
window and step size) -
required
tapers (precalculated tapers from dpss, or in the form [NW K] e.g [3 5]) -- optional. If not
specified, use [NW K]=[3 5]
pad (padding factor for the FFT) - optional. Defaults to 0.
e.g. For N = 500, if PAD = 0, we pad the FFT
to 512 points; if PAD = 2, we pad the FFT
to 2048 points, etc.
Fs (binning frequency for fft grid used to calculate fft of prolates. 1/Fs is the time between consecutive
points on the grid used for evaluation of the prolates) - optional. Default 1.
fpass (frequency band to be used in the calculation in the form
[fmin fmax])- optional.
Default all frequencies between 0 and Fs/2
err (error calculation [1 p] - Theoretical error bars; [2 p] Jackknife error bars,
[0 p] or 0 - no error bars) - optional. Default 0.
trialave (average over trials when 1, don't average when 0) -
optional. Default 0
fscorr (finite size corrections, 0 (don't use finite size corrections) or 1 (use finite size corrections) - optional
(available only for spikes). Defaults 0.

0001 function [S,t,f,R,Serr]=mtspecgramtrigpt(data,E,win,movingwin,tapers,pad,Fs,fpass,err,trialave,fscorr) 0002 % Multi-taper triggered time-frequency spectrum - point process times 0003 % 0004 % Usage: 0005 % 0006 % [S,t,f,R,Serr]=mtspecgramtrigpt(data,E,win,movingwin,tapers,pad,Fs,fpass,err,trialave,fscorr) 0007 % Input: 0008 % data (structure array of spike times with dimension channels/trials; also accepts 1d array of spike times) -- required 0009 % E (event times) - required 0010 % win (in the form [winl,winr] i.e window around each event 0011 % required 0012 % movingwin (in the form [window winstep] i.e length of moving 0013 % window and step size) - 0014 % required 0015 % tapers (precalculated tapers from dpss, or in the form [NW K] e.g [3 5]) -- optional. If not 0016 % specified, use [NW K]=[3 5] 0017 % pad (padding factor for the FFT) - optional. Defaults to 0. 0018 % e.g. For N = 500, if PAD = 0, we pad the FFT 0019 % to 512 points; if PAD = 2, we pad the FFT 0020 % to 2048 points, etc. 0021 % Fs (binning frequency for fft grid used to calculate fft of prolates. 1/Fs is the time between consecutive 0022 % points on the grid used for evaluation of the prolates) - optional. Default 1. 0023 % fpass (frequency band to be used in the calculation in the form 0024 % [fmin fmax])- optional. 0025 % Default all frequencies between 0 and Fs/2 0026 % err (error calculation [1 p] - Theoretical error bars; [2 p] Jackknife error bars, 0027 % [0 p] or 0 - no error bars) - optional. Default 0. 0028 % trialave (average over trials when 1, don't average when 0) - 0029 % optional. Default 0 0030 % fscorr (finite size corrections, 0 (don't use finite size corrections) or 1 (use finite size corrections) - optional 0031 % (available only for spikes). Defaults 0. 0032 0033 % Output: 0034 % S (triggered time-frequency spectrum in form time x frequency x channels/trials) 0035 % t (times) 0036 % f (frequencies) 0037 % R (spike rate) 0038 % Serr (error bars) 0039 0040 if nargin < 4; error('Need data, events and parameters for the windows'); end; 0041 if nargin < 5; tapers=[3 5]; end; 0042 if nargin < 6;pad=0;end; 0043 if nargin < 7; Fs=1; end; 0044 if nargin < 8; fpass=[0 Fs/2]; end; 0045 if nargin < 9; err=0; end; 0046 if nargin < 10; trialave=0;end; 0047 if nargin < 11; fscorr=0; end; 0048 if isempty(tapers); tapers=[3 5]; end; 0049 if isempty(pad);pad=0;end; 0050 if isempty(Fs); Fs=1; end; 0051 if isempty(fpass); fpass=[0 Fs/2]; end; 0052 if isempty(err); err=0; end; 0053 if isempty(trialave);trialave=0;end; 0054 if isempty(fscorr);fscorr=0;end 0055 0056 data=createdatamatpt(data,E,Fs,win); 0057 trialave=1; 0058 if nargout==5; [S,t,f,R,Serr]=mtspecgrampt(data,movingwin,tapers,pad,Fs,fpass,err,trialave,fscorr); 0059 else; [S,t,f,R]=mtspecgrampt(data,movingwin,tapers,pad,Fs,fpass,err,trialave,fscorr);end;