Ešte chvíľu ^^^ viď animáciu vyššie sa venujme Hrubošovej hypotéze v Tokamaku. Ukážem Vám, čo sa deje a to spomalene na grafe, ako padá slučka a jej výkon o 1/4 s každou slučkou. Porovnajte prosím aj animácie pre vyššie hodnoty x=<-100;100>, či <-10;10> Tu sú animované grafy:

A teraz spomalene, kde to vidieť najlepšie:

Na tomto animáku ^^^ poslednom vidieť realitu mojej hypotézy. Tokamak sa snaží vyrobiť energiu, tá zdanlivo stúpa, ale nakoniec padne na nulu respektíve vyrovnanie sa na nulu.

# animovaný graf
import Pkg
Pkg.add("Plots")
Pkg.add("QuadGK")
using QuadGK
# Animovaný graf: y = 1 / x^(2k) pre k ∈ [-0.5, 0.5]
using Plots
gr()

# Rozsah premennej x
x = range(-5, 5, length=400)

# Vytvorenie animácie
anim = @animate for k in range(-0.5, 0.5, length=200)
    # Použijeme komplexné čísla, aby fungovalo aj pre záporné x
    y = @. 1 / ((x + 0im)^(2k))
    # Použijeme iba reálnu časť
    y_real = real.(y)

    # Odstránime nedefinované alebo nekonečné hodnoty
    y_real[isinf.(y_real) .| isnan.(y_real)] .= NaN

    # Teraz používame iba reálne hodnoty pre graf
    plot(
        x, y_real,
        ylim=(-1, 2), xlim=(-5, 5),
        lw=2, color=:blue,
        title="y = 1 / x^(2k),   k = $(round(k, digits=3))",
        xlabel="x", ylabel="y",
        legend=false,
        )
end

# Uloženie animácie do GIF súboru
gif(anim, "y_1_over_x_2k_range_-0.5_to_0.5.gif", fps=15)

if !Base.isinteractive()
    println("Press enter to quit:")
    readline()
end

---