Skip to contents

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

Value

Invisible NULL

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)
} # }