Usage
# S3 method for Trajectory
plot(x, add = FALSE, draw.start.pt = TRUE,
turning.angles = NULL, xlim = grDevices::extendrange(x$x),
ylim = grDevices::extendrange(x$y),
xlab = ifelse(is.null(TrajGetUnits(x)), "x", sprintf("x (%s)",
TrajGetUnits(x))), ylab = ifelse(is.null(TrajGetUnits(x)), "y",
sprintf("y (%s)", TrajGetUnits(x))), asp = 1, ...)