Una forma es agregar un rectángulo de color a los elementos mostrados. Tenga en cuenta que la región roja rellena ahora tiene transparencia=0.0 para que el verde no se filtre a través de ella.
a := x^3+x^2-x:
b := 20*sin(x^2)-5:
plots[display](
plottools[transform]((x, y)-> [x, y+x^3+x^2+x])
(plot(20*sin(x^2)-5-x^3-x^2-x,
x = 0 .. 3, filled = true, color = red,
transparency=0.0)),
plot([x^3+x^2+x, 20*sin(x^2)-5],
x = -3 .. 3, y = -30 .. 30, color = black),
plottools:-rectangle([-3,-30],[3,40],colour=green));
Y aquí hay una versión para aquellos que (a menudo de manera no muy acertada) quieran copiar bloques de código de notación Maple 1D en texto plano y pegarlo en una región de entrada de matemáticas 2D.
H := plottools[transform](proc(x, y) [x, y+x^3+x^2+x]; end proc):
plots[display](H(plot(20*sin(x^2)-5-x^3-x^2-x,
x = 0 .. 3, filled = true, color = red,
transparency=0.0)),
plot([x^3+x^2+x, 20*sin(x^2)-5],
x = -3 .. 3, y = -30 .. 30, color = black),
plottools:-rectangle([-3,-30],[3,40],colour=green));
El analizador de Matemáticas 2D no le agrada la primera versión anterior ya que el código formateado involucra espacios adicionales entre el resultado de transform
y sus argumentos entre corchetes. Un espacio en una llamada de función como esta se interpreta en el modo de Matemáticas 2D como una multiplicación implícita. Todos estos problemas de análisis no tienen nada en particular que ver con esta solución, o con colores de fondo en gráficos, o con plots[display]
.