Combined plot showing function contours, critical points, and a gradient trajectory.
Usage
morse.analysis.plot(
grid,
f.grid,
trajectory,
critical.points,
show.contours = TRUE,
main = "Morse Analysis",
...
)Arguments
- grid
Grid object from create.grid
- f.grid
Matrix of function values
- trajectory
Trajectory object from compute.gradient.trajectory
- critical.points
List with critical points from find.critical.points
- show.contours
Logical, whether to show contour lines (default TRUE)
- main
Plot title
- ...
Additional arguments passed to plotting functions
Examples
if (FALSE) { # \dontrun{
grid <- create.grid(30)
f <- function(x, y) sin(3*x) * cos(3*y)
f.grid <- evaluate.function.on.grid(f, grid)
critical <- find.critical.points(f.grid)
traj <- compute.gradient.trajectory(15, 20, f.grid)
morse.analysis.plot(grid, f.grid, traj, critical)
} # }