La sfida qui è quella di rappresentare con precisione il fiore della vita (che è una figura geometrica sacra secondo alcuni) nel linguaggio che preferisci.

Il disegno consiste in una disposizione di cerchi e cerchi parziali del raggio 1, come mostrato i cui centri sono disposti su una griglia triangolare del passo 1, più un cerchio più grande del raggio 3 che li circonda.

Il design può essere ridimensionato a piacere, ma è consentito un errore massimo del 2% da matematicamente corretto. Se si utilizza la grafica raster, ciò limita effettivamente il diametro dei piccoli cerchi ad almeno circa 100 pixel.

Dato che si tratta di code-golf, vince il codice più breve (byte).

Mathematica, 177 173 128 124 120 byte

c=Circle;Graphics@{{0,0}~c~3,Rotate[Table[If[-3<x-y<4,c[{√3x,-x+2y}/2,1,Pi/{6,2}]],{x,-3,2},{y,-4,2}],Pi/3#]&~Array~6}

L'idea principale è quella di comporre il risultato da sei versioni ruotate di questo:

Questo a sua volta è una tabella rettangolare di archi circolari identici con due angoli tagliati. Se rimuoviamo la cesoiatura e rappresentiamo ogni centro del cerchio con a #, fondamentalmente vogliamo distribuire i cerchi in questo modello:

####
#####
######
######
 #####
  ####

Questi bordi vengono tagliati imponendo la condizione -3 < x-y < 4 sugli indici 2D (poiché il valore di x-yè costante lungo le diagonali) e la cesoiatura deriva dalla moltiplicazione di questi xe yda vettori di base non ortogonali che abbracciano la griglia che stiamo cercando.

Questo particolare orientamento degli archi non ruotati risulta essere il più breve poiché entrambe le estremità dell'arco si dividono uniformemente in Pimodo che l'arco possa essere espresso comePi/{6,2} (tutti gli altri archi richiederebbero e un segno meno o numeri interi aggiuntivi nel numeratore).

OpenSCAD, 228 byte

$fn=99;module o(a=9){difference(){circle(a);circle(a-1);}}function x(n)=9*[sin(n*60),cos(n*60)];module q(g){for(i=[1:6])if(g>0){translate(x(i))union(){o();q(g-1);}}else{intersection(){translate(x(i))o();circle(9);}}}q(2);o(27);

La seguente è una versione che consente a qualcuno di impostare i parametri r (raggio) ew (larghezza degli anelli).

r=1;w=.1;$fn=99;module o(n){difference(){circle(n);circle(n-w);}}function x(n)=(r-w/2)*[sin(n*60),cos(n*60)];module q(g){for(i=[1:6])if(g>0){translate(x(i))union(){o(r);q(g-1);}}else{intersection(){translate(x(i))o(r);circle(r);}}}q(2);o(3*r-w);

Questa versione ha esattamente 246 caratteri.
Parte di questo codice è tecnicamente superfluo ma lo rende più simile all'immagine.

Mathematica 263 byte

Non sono molto competitivo con la presentazione di @ MartinEnder, ma mi sono comunque divertito. Lascio che i petali facciano una passeggiata casuale! Il petalo cammina ruotando di 60 gradi in modo casuale attorno a uno degli endpoint, anch'esso scelto casualmente. Provo a vedere se l'estremità rotante del petalo cade al di fuori del grande disco e, in tal caso, la rotazione procede dall'altra parte.

c=Circle;a=√3;v={e=0{,},{0,2}};f=RandomChoice;Graphics@{e~c~6,Table[q=f@{1,2};t=f@{p=Pi/3,-p};r=RotationTransform[#,v[[q]]]&;v=r[If[r[t]@v[[-q]]∈e~Disk~6,t,-t]]@v;Translate[Rotate[{c[{1,a},2,p{4,5}],c[{1,-a},2,p{1,2}]},ArcTan@@(#-#2)&@@v,e],v[[2]]],{5^5}]}

Ecco il codice successivo che ho usato per l'animazione.

Export[NotebookDirectory[]<>"flower.gif", Table[Graphics[Join[{c[e,6]},(List@@%)[[1,2,1;;n-1]],{Thick,Red,(List@@%)[[1,2,n]]}]],{n,1,3^4,1}]]

Ho letto da qualche parte che le passeggiate casuali bidimensionali devono eventualmente tornare alle origini. Sembra che poche migliaia di passaggi garantiscano il riempimento del disco di grandi dimensioni.

JavaScript (ES6) / SVG, 299 byte

with(document){write(`<svg height=250 width=250><circle${b=` fill=none stroke=black `}cx=125 cy=125 r=120 />`);for(i=0;i<24;i++)write(`<path${b}d=M5,125${`${a=`a60,60,0,0,1,`}40,0`.repeat(i%4+3)+`${a}-40,0`.repeat(i%4+3)} transform=${`rotate(60,125,125)`.repeat(i>>2)}rotate(-60,${i%4*4}5,125) />`)}

Funziona generando più coppie di archi di varie lunghezze e ruotandole in posizione.