Yhteenveto

Lisenssi

Minä, tämän teoksen tekijänoikeuksien haltija, julkaisen täten tämän teoksen seuraavalla lisenssillä:

Tämä tiedosto on lisensoitu Creative Commons Nimeä-JaaSamoin 3.0 Ei sovitettu -lisenssillä.

Voit:

• jakaa – kopioida, levittää ja esittää teosta
• remiksata – valmistaa muutettuja teoksia

Seuraavilla ehdoilla:

• nimeäminen – Sinun on mainittava lähde asianmukaisesti, tarjottava linkki lisenssiin sekä merkittävä, mikäli olet tehnyt muutoksia. Voit tehdä yllä olevan millä tahansa kohtuullisella tavalla, mutta et siten, että annat ymmärtää lisenssinantajan suosittelevan sinua tai teoksen käyttöäsi.
• jaa samoin – Jos muutat tai perustat tähän työhön, voit jakaa tuloksena syntyvää työtä vain tällä tai tämän kaltaisella lisenssillä.

https://creativecommons.org/licenses/by-sa/3.0CC BY-SA 3.0 Creative Commons Attribution-Share Alike 3.0 truetrue

Gnuplot

set term svg size 800,600 enhanced font 'Times,12'
set output 'Natural_Logarithm_All.svg'

set multiplot

set xlabel "x"
set ylabel "y"
set zlabel "z"
set xrange [-2.5:2.5]
set yrange [-2.0:2.0]
set zrange [-3:4]
set box
unset colorbox
#set view 65,45

set cntrparam levels auto 20
set contour base
set isosamples 60,60
set samples 60,60
set pm3d
set hidd
unset key
set ticslevel 0
i = {0.0,1.0}

# Draw the surface of Re(ln(x+i*y))
set palette defined (-1 "blue", 1 "pink")
splot real(log(x+i*y))

# Draw the surface of |Im(ln(x+i*y))|
set palette defined (-1 "yellow", 1 "orange")
splot abs(imag(log(x+i*y)))

# Draw the surface of |ln(x+i*y)|
set palette defined (-1 "red", 1 "orange")
splot abs(log(x+i*y))

# Draw the lines
unset cntrparam
unset contour
set isosamples 20,20
set samples 20,20
unset pm3d
unset hidd

# Draw the lines of Re(ln(x+i*y))
splot real(log(x+i*y)) lt 2 lc rgb "black" lw 0.1

# Draw the lines of |Im(ln(x+i*y))|
splot abs(imag(log(x+i*y))) lt 2 lc rgb "black" lw 0.1

# Draw the lines of |ln(x+i*y)|
splot abs(log(x+i*y)) lt 2 lc rgb "black" lw 0.1

unset multiplot
set term x11
set output