C’est la réalisation d’Erik Mahieu avec Mathematica :
https://demonstrations.wolfram.com/InverseStereographicProjectionOfTheLogarithmicSpiral/
qui m’a donné envie de réaliser quelque chose d’équivalent avec PSTricks. Bien sûr Mathematica possède des outils très puissants, ce qui n’enlève rien au talent d’ErikMahieu ainsi qu’aux très nombreux auteurs qui déposent leurs applications sur la plate-forme :
https://demonstrations.wolfram. com/.
Deux commandes additionnelles à pst-solides3d ont été nécessaires : \listplotIIID[options], qui avait déjà été utilisée dans plusieurs exemples, comme :
http://pstricks.blogspot.com/2018/05/les-attracteurs-de-lorenz-rossler-et.html
http://pstricks.blogspot.com/2012/10/swinging-atwoods-machine-animation-en-3d.html
et \psInverseStereographicLogarithmicSpiral[options] qui est détaillée dans la documentation.
Les fichiers sont accessibles ici :
InverseStereographicLogarithmicSpiral.zip
ou sur Drive :
InverseStereographicLogarithmicSpiral.zip
Images extraites de la documentation :
En inversant les couleurs (avec The Gimp) l'image est plaisante :
Aucun commentaire:
Enregistrer un commentaire