Spirali 7 , versione 5 , genspir

+

I diagrammi possono essere sovrapposte inserendo le loro procedure nel comando del display: Figura. 3.1 display ([genSpir (50), pointSpir (50)]); Figura. 3.2 Display ([pointSpir (50), FibSpirOne (50,8,0), FibSpirOne (50,8,1)]); Fig 3.3 display ([pointSpir (50), FibSpirals (50,8), FibSpirals (50,13)], spessore = 2): Nella Fig 3.3 punti tracciati dal pointSpir (50) sono oscurate dalle trame di FibSpirals (50,8) e FibSpirals (50,13). Questo può essere risolto come segue. Modifica dei programmi in pp 481-482 di Michael Kofler, "Maple: Introduzione e di riferimento,". Addison - Wesley, 1997), si ottiene una procedura circplot che si applica a una lista di punti (rappresentato da coppie di coordinate cartesiane) e un vero rx numero; come output si traccia un cerchio di raggio rx in ciascuno dei punti. Questo ci permette di definire una procedura circSpir (seedpoints, rx), che disegna un cerchio di raggio rx in ogni punto della spirale generatrice discreta. circ: = proc (x :: numneric, y :: numerico, rx :: numerico, n :: numerico) di dati locali, i dati: = NULL; per i da 0 a evalf (2 * pi-0.00001) da evalf (2 * Pi / N) di dati: = dati, [Evalf (x + rx * sin (i), 5), evalf (y + RX * cos (i), 5,)]; od; [dati]; fine: circplot: = proc (dati :: list, rx :: numerico) i locali, pol; pol: = []; pol: = seguenti (circ (data [i] [1], i dati [i] [2], rx, 25), i = 1..nops (dati)); polygonplot ([pol].scaling = vincolata, assi = nessuno); fine: circSpir: = proc (n :: intero, rx :: numerico) i locali, a, r, s; s: = NULL; per i da 0 a n fare: = oro * i; r: = n * oro-a; s: = s, [evalf (r * cos (a)), evalf (r * sin (a))]; od; circplot ([s], rx); fine: Figura. Display 3.4-P ([pointSpir (50)]); Fig 3.4-2 display ([circSpir (50,2)]); Fig 3,5-3 display ([circSpir (50,3), FibSpirals (50,8), FibSpirals (50,13)], spessore = 2); Osservazione 3.1 considerando che le procedure genSpir, pointSpir e FibSpirals sono stati sviluppati come parte della nostra ricerca scientifica, la procedura circSpir solo migliora la presentazione dei risultati scientifici. Questo nello sviluppo della procedura di circSpir stiamo facendo arti grafiche, non scienza. Non c'è niente di sbagliato con la combinazione delle due attività, ma è importante essere consapevoli del fatto che i due tipi di lavoro hanno obiettivi diversi.