é possível obter o código que gera os gráficos que você adicionou usando as ferramentas de desenho.
Por exemplo, aqui está uma quadrática em que usei as ferramentas de desenho para adicionar setas às interceptações de x:
Plot[x^2 - 4, {x, -3, 3}]
Apósotipodegráfico//InputForm
paraverocódigoquefazosgráficos.Nessecaso,tambémusei/.Line[x_]->Line
parasuprimirtodosospontosquecompõemográfico:
O código realçado é aquele que foi adicionado pelas ferramentas de desenho. Ele pode ser simplificado (por exemplo, remover os comandos EdgeForm
e substituir o Inset
Cell
por apenas um comando Text
simples) ao adicioná-lo de volta ao seu Plot
original, o que pode ser feito com um < href="http://reference.wolfram.com/mathematica/ref/Epilog.html"> Epilog
(ou um Prolog
) ou usando Show
.