Wolfram Language Paclet Repository

Community-contributed installable additions to the Wolfram Language

Primary Navigation

    • Cloud & Deployment
    • Core Language & Structure
    • Data Manipulation & Analysis
    • Engineering Data & Computation
    • External Interfaces & Connections
    • Financial Data & Computation
    • Geographic Data & Computation
    • Geometry
    • Graphs & Networks
    • Higher Mathematical Computation
    • Images
    • Knowledge Representation & Natural Language
    • Machine Learning
    • Notebook Documents & Presentation
    • Scientific and Medical Data & Computation
    • Social, Cultural & Linguistic Data
    • Strings & Text
    • Symbolic & Numeric Computation
    • System Operation & Setup
    • Time-Related Computation
    • User Interface Construction
    • Visualization & Graphics
    • Random Paclet
    • Alphabetical List
  • Using Paclets
    • Get Started
    • Download Definition Notebook
  • Learn More about Wolfram Language

NumberTheoryUtilities

Guides

  • UtilitiesBreakdown

Symbols

  • ChordTrailsPlot
  • SpiralLattice
  • SunflowerEmbedding
  • SunflowerEmbeddingPlot
  • TriangleMatrixEmbedding
AntonAntonov`NumberTheoryUtilities`
SunflowerEmbedding
​
SunflowerEmbedding
[n]
gives the sunflower embedding for the first
n
positive integers.
​
​
SunflowerEmbedding[n,f]
use the function
f
to assign group value for each integer.
​
​
SunflowerEmbedding[n,f,a]
use the angle
a
for the spirals.
​
Details and Options

Examples  
(3)
Basic Examples  
(1)
Get the sunflower embedding for the first 30 positive integers:
In[1]:=
SunflowerEmbedding
[10]
Out[1]=
xCos
2π
2
GoldenRatio
,ySin
2π
2
GoldenRatio
,x
2
Cos
4π
2
GoldenRatio
,y
2
Sin
4π
2
GoldenRatio
,x
3
Cos
6π
2
GoldenRatio
,y
3
Sin
6π
2
GoldenRatio
,x2Cos
8π
2
GoldenRatio
,y2Sin
8π
2
GoldenRatio
,x
5
Cos
10π
2
GoldenRatio
,y
5
Sin
10π
2
GoldenRatio
,x
6
Cos
12π
2
GoldenRatio
,y
6
Sin
12π
2
GoldenRatio
,x
7
Cos
14π
2
GoldenRatio
,y
7
Sin
14π
2
GoldenRatio
,x2
2
Cos
16π
2
GoldenRatio
,y2
2
Sin
16π
2
GoldenRatio
,x3Cos
18π
2
GoldenRatio
,y3Sin
18π
2
GoldenRatio
,x
10
Cos
20π
2
GoldenRatio
,y
10
Sin
20π
2
GoldenRatio

Use the second argument to specify groups in the embedding:
In[2]:=
SunflowerEmbedding
[10,Boole@*PrimeQ]
Out[2]=
xCos
2π
2
GoldenRatio
,ySin
2π
2
GoldenRatio
,group0,x
2
Cos
4π
2
GoldenRatio
,y
2
Sin
4π
2
GoldenRatio
,group1,x
3
Cos
6π
2
GoldenRatio
,y
3
Sin
6π
2
GoldenRatio
,group1,x2Cos
8π
2
GoldenRatio
,y2Sin
8π
2
GoldenRatio
,group0,x
5
Cos
10π
2
GoldenRatio
,y
5
Sin
10π
2
GoldenRatio
,group1,x
6
Cos
12π
2
GoldenRatio
,y
6
Sin
12π
2
GoldenRatio
,group0,x
7
Cos
14π
2
GoldenRatio
,y
7
Sin
14π
2
GoldenRatio
,group1,x2
2
Cos
16π
2
GoldenRatio
,y2
2
Sin
16π
2
GoldenRatio
,group0,x3Cos
18π
2
GoldenRatio
,y3Sin
18π
2
GoldenRatio
,group0,x
10
Cos
20π
2
GoldenRatio
,y
10
Sin
20π
2
GoldenRatio
,group0
Scope  
(1)

Applications  
(1)

SeeAlso
SunflowerEmbeddingPlot
""

© 2025 Wolfram. All rights reserved.

  • Legal & Privacy Policy
  • Contact Us
  • WolframAlpha.com
  • WolframCloud.com