Я создал контурный график в wxmaxima и хотел бы нарисовать многоугольник сверху (определяемый его угловыми точками). Примерно так, но в одном сюжете:
lx:[-0.5,1.5,2,-1.5]$
ly:[-1,-0.5,1,1.5]$
wxcontour_plot(20*exp(-x^2-y^2)-10,[x,-2,2],[y,-2,2],[yx_ratio,1],[xlabel,"x[m]"],[ylabel,"y[m]"],
[gnuplot_preamble, "set cntrparam levels 18; set grid; set size ratio -1; set key outside top rmargin"],
[grid,2,100])$
wxdraw2d(polygon(lx,ly))$
Вот обходной путь с использованием gnuplot_preamble:
lx:[-0.5,1.5,2,-1.5]$
ly:[-1,-0.5,1,1.5]$
wxcontour_plot(20*exp(-x^2-y^2)-10,[x,-2,2],[y,-2,2],[yx_ratio,1],[xlabel,"x[m]"],[ylabel,"y[m]"],
[gnuplot_preamble, "set cntrparam levels 18; set grid; set size ratio -1;
set key outside top;
set object 1 polygon from -0.5,-1. to 1.5,-0.5 to 2.,1. to -1.5,1.5 to -0.5,-1. fs solid fc rgb 'red';"],
[grid,2,100])$
Если вы хотите, чтобы ваш полигон был непрозрачным, добавьте front в определение полигона.
