R/standard_colours.R

In RobinHankin/schwarzschild: General Relativity in R

standard_colours <-

  list(
      ingoing_light   = "red",
      outgoing_light  = "blue",
      horizon         = "magenta",
      singularity     = "black",
      singularity_interior  = "gray",
      r               = "green",  # lines of constant Schwarzschild r
      t               = "orange", # lines of constant Schwarzschild t
      
      photon          = "red",
      timelike_curve  = "black",
      spacelike_curve = "blue",
      raindrop        = "black",

      cone_interior   = "gray",
      cone_edge       = "black",
      
      captured        = "red",  # used in kruskal_with_throw.R
      escaping        = "blue",
      critical        = "green",

      kruskal_X       = "steelblue1",   # used in krusal_szekeres_inverted.R
      kruskal_T       = "sienna3"
  )