Waste less time on Facebook — follow Brilliant.
×

Happy New Year!

Here is a tree with 2015 nodes:

img

img

Large Version (Link)

Mathematica Code:

1
2
3
4
5
6
7
8
9
TreeGraph[RandomInteger[#] \[DirectedEdge]  # + 1 & /@ Range[0, 2013],
  VertexSize -> Table[i -> RandomReal[10], {i, 2013}], 
 VertexStyle -> 
  Table[i -> ColorData["CherryTones"] /@ RandomReal[1, 1], {i, 2013}],
  EdgeStyle -> RGBColor[0.3, 1, 0.5], ImageSize -> Full, 
 Background -> Black, GraphLayout -> "RadialEmbedding", 
 EdgeShapeFunction -> 
  GraphElementData[{"HalfFilledArrow", "ArrowSize" -> .005}], 
 PlotLabel -> Style["a tree with 2015 nodes", Gray, 20]]

Note by Agnishom Chattopadhyay
2 years, 4 months ago

No vote yet
1 vote

Comments

Sort by:

Top Newest

well I have got one more thing which displays d beauty of math..

It is known as the Love graph.

Google this equation (just copy/paste) : " 5 + (-sqrt(1-x^2-(y-abs(x))^2))cos(30((1-x^2-(y-abs(x))^2))), x is from -1 to 1, y is from -1 to 1.5, z is from 1 to 6 "

You will be amazed by the curve it produces.

Love Graph

Love Graph

This is just a mere review of the curve. You can even edit the values and see the transformations. Harshvardhan Mehta · 2 years, 4 months ago

Log in to reply

@Harshvardhan Mehta This is better and my original work:

img

img

Code:

1
2
3
4
5
6
def f(z):
    x = real(z)
    y = imaginary(z)
    return (x^2 + y^2 -1)^3 - x^2*y^3

complex_plot(lambda z: (1/f(z)*i^(z+1)),(-1.5,1.5),(-1.5,1.5),plot_points=300)

Code credit: Agnishom Chattopadhyay Agnishom Chattopadhyay · 2 years, 4 months ago

Log in to reply

@Agnishom Chattopadhyay its superb nyc work.. Harshvardhan Mehta · 2 years, 4 months ago

Log in to reply

×

Problem Loading...

Note Loading...

Set Loading...