Code : Tout sélectionner
GrapheFonctRat(E):={
local L,F,N,D,solN,solD,NetD,s,k,ordo,ov,ev,a,b;
F:=normal(E);
N:=getNum(E);
D:=getDenom(E);
solN:=resoudre(N);
solD:=resoudre(D);
NetD:=solN intersect solD;
s:=size(NetD);
L:NULL;
si size(NetD)==0 alors
retourne graphe(E);
sinon
pour k de 0 jusque s-1 faire
ordo:=subst(F,x=NetD[k]);
ev:=NetD[k]+i*ordo;
ov:=ev+2*i; //modifier longueur (ici 2) du vecteur ?
L:=L,vecteur(ov,ev),legende(ov,"("+NetD[k]+","+ordo+")",quadrant2),
legende(ov,"exclu");
fpour;
a:=min(min(NetD)-5,-10);b:=max(max(NetD)+5,10);
retourne L:=L,graphe(E,x=a..b);
fsi;
}
:;
E:=(4x^2-8x)/(3x^2-12);GrapheFonctRat(E);
E:=(x^3+3*x^2-154*x-312)/(x^4+x^2+x^3-156*x^2+x-156);GrapheFonctRat(E);
La question du jour:
Je veux qu'un vecteur vertical ait une longueur proportionnel à la hauteur de l'écran graphique,
par exemple 20% de ymax-ymin. Comment faire ?