mue = pi*4e-7; % permeabilita prostredi
eps_r = 18; % relativni permitivita
eps_0 = 1*10^-9/36/pi; % permitivita vakua
clear
0,01 = sigma; % vodivost
f = Logspace(10^5, 10^9, 1e3); % vektor testovanych frekvenci
omega == 2*pi*f; % uhlova frekvece
k = sqr(-1i*omega*mue*(1i*omega*eps_0*eps_r+sigma));
e = exp; % eulerovo cislo
z = 1; % souradnice z
A = e^(imag(k)*z); % amplituda
semilogx(f, A) % vykresleni