| Siguiente: Gráficos 2D Superior: Comenzando con PDL: un Anterior: Aritmética |
Para poder representar gráficamente lo que vamos creando es interesante introducir unos pocos comandos gráficos. Más adelante veremos cómo conocer comandos gráficos más complejos.
Los gráficos tridimensionales no se cargan por defecto al arrancar PDL, con lo cual debemos cargar el módulo siguiente
perldl> use PDL::Graphics::TriD;
Para representar funciones 3D usaremos
el comando imag3d.
Podemos por ejemplo pintar
la gaussiana mencionada más arriba
(recordemos que antes hay
que cargar el módulo 3D con
la línea use mencionada más arriba).
perldl> $x=zeroes(20,20)->xlinvals(-0.5,0.5); perldl> $y=zeroes(20,20)->ylinvals(-0.5,0.5); perldl> $gaus=exp( -($x**2)/0.05 - ($y**2)/0.02 ); perldl> imag3d([$gaus])
Debería aparecer algo como la Fig. 1.
Nótese que no nos devuelve el ``prompt''.
La razón de ello es que podemos
modificar la función representada
en el lugar. Si ponemos el ratón sobre
la gráfica podemos girarla apretando el botón
izquierdo y arrastrando el ratón.
Se puede tambíen hacer un zoom hacia dentro
o hacia fuera con el botón derecho del
ratón y arrastrándolo.
Para salir de este estado pulse la tecla q.
Volverá el ``prompt''. Después de ello conviene
no matar la ventana gráfica para poder seguir
con la sesión interactiva de PDL.
