## run a simple crqa
ts1 = c(0, 0, 1, 1, 0, 0, 2, 2, 1, 1)
ts2 = c(1, 1, 2, 2, 0, 0, 1, 2, 0, 0)
res = crqa(ts2, ts1, delay = 1, embed = 1, rescale = 0,
radius = 0.01, normalize = 0, mindiagline = 2,
minvertline = 2, tw = 0, method = "crqa", side = "both",
datatype = "continuous")
RP = res$RP
## define plotting arguments
par = list(unit = 1, labelx = "Time", labely = "Time",
cols = "blue", pcex = 1, pch = 19,
labax = seq(0, nrow(RP), 1),
labay = seq(0, nrow(RP), 1),
las = 1)
plotRP(RP, par)
Run the code above in your browser using DataLab