我需要在 2 和 4 之间绘制一个 x 到阴影区域,但是遇到了障碍,表面部分感觉没有一个好的方法来做到这一点,并且我需要找到该点的 x 坐标两条线相交。
以及如何摆脱顶部和右侧的黑框线。
names default to here(1);
new window("Ex",
gb=graph box(
framesize(300,300),
x scale(-6,6),
y scale(0,20),
double buffer,
pen color(3);
y function(x*x,x);
pen color(4);
Vline(2,0,4);
vline(4,0,16);
yfunction(x-2,x,max(4),min(2));
yfunction(x-2.5,x,max(4),min(2));
yfunction(x-3,x,max(4),min(2));
yfunction(x-3.5,x,max(4),min(2));
yfunction(x,x,max(4),min(2));
yfunction(x-0.5,x,max(4),min(2));
yfunction(x-1,x,max(4),min(2));
yfunction(x-1.5,x,max(4),min(2));
yfunction(x+0.5,x,max(4),min(2));
yfunction(x+1,x,max(4),min(2));
yfunction(x+1.5,x,max(4),min(2));
)
);Hi @lehaofeng ,
我实际上不明白你所问的一切。所以让我帮助你(我想你问的是)顶部/右侧的黑线:
只需右键单击图表 > 边框 > 取消选择“顶部”和“右侧”

会给你这个:

希望这可以帮助,
弗洛里安
您可以使用带有彩色填充图案的多边形。
Names Default to Here( 1 );
// integration resolution
nSteps = 25;
// function range for AUC
xMin = 2;
xMax = 3;
// define function
fxn = Function( {x},
Return( x:*x );
);
// define polygon along top
polyX = Index( xMin, xMax, 1/nSteps );
polyY = fxn( polyX );
// finish (close) polygon
polyX ||= Transpose( Matrix( Eval List( List( xMax, xMin, xMin) ) ) );
polyy ||= Transpose( Matrix( Eval List( List( 0, 0, 4 ) ) ) );
New Window( "AUC",
Outline Box( "Plot",
Graph Box(
X Scale( -5, 5 ),
Y Scale( 0, 25 ),
Pen Color( "Black" );
Y Function( fxn( x ), x );
Fill Color( "Green" );
Fill Pattern( "right slant light" );
Polygon( polyX, polyY );
)
),
Outline Box( "AUC",
Table Box(
String Col Box( "Method", { "Polygon", "Calculus" } ),
Number Col Box( "Estimate", { Polygon Area( polyX, polyY ), 19/3 } )
)
)
);