TeXgraph# {version 1.97} Cmd Fenetre(-4.5+5.5*i, 5.5-5*i, 0.66666666666667+0.66666666666667*i); Marges(0, 0, 0, 0); Border(0); [OriginalCoord(1), IdMatrix()]; [theta:=-0.5236, phi:=1.3963, IdMatrix3D(), ModelView(ortho)]; [GrayScale(0), ComptGraph:=1]; Mac xlegend = "$x$"; ylegend = "$y$"; zlegend = "$z$"; text3d1 = "$x$"; text3d2 = "$y$"; text3d3 = "$x$"; text3d4 = "$y$"; text3d5 = "$z$"; Cmd [tMin:=-5,tMax:=5,DotScale:=1+i]; Graph objet1 = [ view(-4.5,5.5,-5,5.5), Marges(0,0,0,0), size(7), ModelView(ortho), view3D(-5,5,-5,5,-5,5), viewDir(-30,80), FillColor:=yellowgreen, FillStyle:=full, FillOpacity:=0.2, Color:=darkgreen, N:=M(2,2,1), R:=3, hiddenLines:=0, S:=Sphere(Origin, 3), P:=[Origin, N], Build3D( bdLabel(M(-2, 1, 2), "$x$", [showdot:=1, dotscale:=1.3, labelpos:=[0.4, vecI], labelsize:=large]), bdLabel(M(1, -2, 2), "$y$", [showdot:=1, dotscale:=1.3, labelpos:=[0.4, vecI], labelsize:=large]), bdPlan([Origin,N], [color:=royalblue, bordercolor:=black, scale:=0.75,border:=1, opacity:=0.4]), bdSphere(Origin, 3, [color:=skyblue,contrast:=0.5, opacity := 0.2]), bdCercle(Origin, R+0.01,N,[color:=red,width:=8]), bdAxes(Origin, [arrows:=1]), ), Display3D() ];