## Begin with a path
(zp <- zenpath(c(3, 5), method = "eulerian.cross")) # integer(2) argument
## Extract the first two pairs and last four of indices
extract_pairs(zp, n = c(2, 4))
## Extract the first and last three pairs of indices
extract_pairs(zp, n = 3) # the 3 is repeated automatically
Run the code above in your browser using DataLab