# use the available data
data(crqa)
listener = eyemovement$listener
narrator = eyemovement$narrator
res = drpfromts(narrator, listener, windowsize = 100,
radius = 0.001, delay = 1, embed = 1, rescale = 0,
normalize = 0, mindiagline = 2, minvertline = 2,
tw = 0, whiteline = FALSE, recpt = FALSE,
side = 'both', method = 'crqa',
metric = 'euclidean', datatype = 'continuous')
profile = res$profile
plot(seq(1,length(profile),1), profile, type = "l", lwd = 5,
xaxt = "n", xlab = "Lag", ylab = "Recurrence")
Run the code above in your browser using DataLab