Bonjour,
J'ai un code qui me permet de tracer un disque:
ce que je voudrais savoir c'est s'il est possible de remplir ce disque avec une couleur. J'ai deux façons de la tracer:
- tout les points dans le disque
-ou juste tracer le coutour
voici le code pour le disque entier:
et voici pour que le contour:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21 n=1/100 x=[-4:n:4]; y=[-4:n:4]; z=x+y*%i; Sx1=[]; Sy1=[]; Sx2=[]; Sy2=[]; for i=x for j=y if abs(i+j*%i+1)<1 then Sx1=[Sx1;i]; Sy1=[Sy1;j]; end end end plot(Sx1,Sy1)
Y a t-il une façon générale de remplir l'intérieur d'une forme que l'on trace ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29 n=1/100 x=[-4:n:4]; y=[-4:n:4]; z=x+y*%i; Sx1=[]; Sy1=[]; Sx2=[]; Sy2=[]; for i=x for j=y if abs(i+j*%i+1)<(1+n/10) & abs(i+j*%i+1)>(1-n/10) & j>=0 then Sx1=[Sx1;i]; Sy1=[Sy1;j]; end end end for i=x for j=y if abs(i+j*%i+1)<(1+n/10) & abs(i+j*%i+1)>(1-n/10) & j<0 then Sx2=[Sx2;i]; Sy2=[Sy2;j]; end end end plot(Sx1,Sy1) plot(Sx2,Sy2)
merci !
Partager