setcirculo.mws

Setor de círculo

> restart:with(plots):with(plottools):

Warning, the name changecoords has been redefined

O nome do comando é pieslice(...) . É complemento do comando anterior. Sua sintaxe pede após o raio a variação angular do setor circular.

Preste atenção na variação angular do exemplo abaixo. o ângulo inicial é Pi/4 e o final é 4*Pi/3 .

> c := pieslice([1,1], 5, Pi/4..4*Pi/3, color=red):
plots[display](c, scaling=constrained);

[Maple Plot]

>

Abaixo fazemos uma adaptação de uma sequência já utilizada com arcos de circunferência. Apenas acrescentamos uma variação dos ângulos inicial e final.

> s:=seq(pieslice([1/t,0],1/t,-Pi/(t+1)..Pi/(t+1),color=blue),t=1..10):
plots[display](s,scaling=constrained);

[Maple Plot]

>

A seguir montamos uma sequência de fatias com centro (0, 0) e raio unitário. Dividimos a variação angular de 0 ateé Pi em 10 intervalos iguais de amplitude Pi/10 . Perceba que os ângulos inicial e final de cada uma das estruturas gráficas criadas são t*Pi/10 e (t+1)*Pi/10 com t variando nos inteiros de 0 até 9. Para cada uma das fatias a cor RGB vai recebendo números cada vez mais pertos de 1.

> s:=seq(pieslice([0,0],1,t*Pi/(10)..(t+1)*Pi/(10),color=COLOR(RGB,0,0,(t+5)/15)),t=0..9):
plots[display](s,scaling=constrained);

[Maple Plot]

>

Para verificar a aprendizagem Clique aqui (wptex9.mws) .

Para ver a próxima seção (Elípse) clique aqui (elipse.mws) .