# use the available data
data(crqa)
listener = eyemovement$listener
narrator = eyemovement$narrator
# NB, the parameters for windowsize and windowstep are large to allow
# faster running time, please set them carefully in your analysis.
delay = 1; embed = 1; rescale = 1; radius = 0.001;
normalize = 0; mindiagline = 2; minvertline = 2;
tw = 0; whiteline = FALSE; recpt = FALSE; side = "both"
method = 'crqa'; metric = 'euclidean';
datatype = "continuous"; windowsize = 100;
lagwidth = 10; windowstep = 200
ans = windowdrp(narrator, listener, windowstep, windowsize, lagwidth,
radius, delay, embed, rescale, normalize,
mindiagline, minvertline, tw,
whiteline, recpt, side, method, metric,
datatype)
profile = ans$profile; maxrec = ans$maxrec; maxlag = ans$maxlag
plot(profile, type = 'l')
Run the code above in your browser using DataLab