( Mathematical software used: Graph )

**Related posts:**

Making Art with Mathematical Equations, Inequalities and Functions (Mappings, Transformations)

a = 2

b = 1

c = 1

w = 8

max(x,y) = x < y ? y : x

min(x,y) = x < y ? x : y

fun(x,y) = \

min(min(max(abs(x)-b,0)**2 + max(abs(y)-(a+b+2*c),0)**2 - c**2, \

max(abs(x)-(a+b+2*c),0)**2 + max(abs(y)-b,0)**2 - c**2), \

max((abs(x)-(b+c))**2 + (abs(y)-(b+c))**2 - c**2, \

c**2 - (abs(x)-(b+2*c))**2 - (abs(y)-(b+2*c))**2))

set xrange [-w:w]

set yrange [-w:w]

set size ratio -1

set samples 512

set isosamples 512

set contour base

set cntrparam levels discrete 0.0

unset key

unset surface

set table 'fun.dat'

splot fun(x,y)

unset table

plot 'fun.dat' w l lw 1.5 lc rgb "red"

(a = 2, b = 1, c = 1)

(a = 4, b = 0.5, c = 0.5)

(a = 0, b = 0, c = 2)

( Mathematical softwares used: Graph, gnuplot )

**Related posts:**

- (Blue Ring) min(max(R
_{1}(x,y), -y), max(R_{1}(x,y), y, -R_{4}(x,y))) < 0 - (Black Ring) min(max(R
_{2}(x,y), -y, -R_{4}(x,y)), max(R_{2}(x,y), y, -R_{5}(x,y))) < 0 - (Red Ring) min(max(R
_{3}(x,y), -y, -R_{5}(x,y)), max(R_{3}(x,y), y)) < 0 - (Yellow Ring) min(max(R
_{4}(x,y), -y, -R_{1}(x,y)), max(R_{4}(x,y), y, -R_{2}(x,y))) < 0 - (Green Ring) min(max(R
_{5}(x,y), -y, -R_{2}(x,y)), max(R_{5}(x,y), y, -R_{3}(x,y))) < 0

- R
_{1}(x,y) = (sqrt((x+2d)² + (y-h)²) - a)² - b² - R
_{2}(x,y) = (sqrt(x² + (y-h)²) - a)² - b² - R
_{3}(x,y) = (sqrt((x-2d)² + (y-h)²) - a)² - b² - R
_{4}(x,y) = (sqrt((x+d)² + (y+h)²) - a)² - b² - R
_{5}(x,y) = (sqrt((x-d)² + (y+h)²) - a)² - b²

- a = 49.25
- b = 4.75
- d = 58.5
- h = 25

( Mathematical softwares used: Graph, gnuplot )

Subscribe to:
Posts (Atom)