| Title: | Defines some physical constants and dielectric functions commonly used in nano-optics |
|---|---|
| Description: | Physical constants. Gold, silver and glass permittivities, together with spline interpolation functions. |
| Authors: | Baptiste Auguie [aut, cre] (<https://orcid.org/0000-0002-2749-5715>, the data have their original source listed in the help file.) |
| Maintainer: | Baptiste Auguie <[email protected]> |
| License: | GPL-3 |
| Version: | 0.2.4 |
| Built: | 2024-10-15 02:43:56 UTC |
| Source: | https://github.com/nano-optics/dielectric |
Dielectric dataset corresponding to the values of Palik.
AgPalikAgPalik
A dielectric reference class with 4 fields
in nm
dielectric function
range of wavelengths
optional information
/https://refractiveindex.info/
Dielectric dataset corresponding to the values of Rakic.
AlRakicAlRakic
A dielectric reference class with 4 fields
in nm
dielectric function
range of wavelengths
optional information
/https://refractiveindex.info/
Dielectric dataset
aSiaSi
A dielectric reference class with 4 fields
in nm
dielectric function
range of wavelengths
optional information
/https://refractiveindex.info/
Dielectric dataset corresponding to the values of Johnson and Christy
AuJCAuJC
A dielectric reference class with 4 fields
in nm
dielectric function
range of wavelengths
optional information
/https://refractiveindex.info/
Dielectric dataset corresponding to the values of Palik
ChromiumChromium
A dielectric reference class with 4 fields
in nm
dielectric function
range of wavelengths
optional information
/https://refractiveindex.info/
clausius_mossotti
clausius_mossotti(alpha = 1, N = 0.1)clausius_mossotti(alpha = 1, N = 0.1)
alpha |
in nm3 |
N |
in nm-3 |
lorentzian polarizability of a molecule
relative dielectric function
baptiste Auguie
Constants dataset
constantsconstants
list with names cel h hbar ee eps0 Z0 Nav mu0
spline interpolation of permittivity
... |
optional arguments passed to smooth.spline |
spline interpolation of permittivity
list
fun(wavelength, ...)returns a continuous function of the wavelength
permittivity(new.wavelength, ...)predict a single value
predict(
sp = NULL,
range = span,
n = length(epsilon),
new.wavelength = NULL,
...
)interpolation with splines
raw(range = span)return the raw data as real numbers
spline(...)returns a list of splinefun for the real and imaginary parts
baptiste Auguie
Conversion to long format data.frame for plotting
dielectric2plot(m)dielectric2plot(m)
m |
data.frame with wavelength and complex epsilon |
Conversion to long format data.frame for plotting
long format data.frame
baptiste Auguie
Drude model for the dielectric function of good (governed by free electrons) metals
drude( wavelength = 633, p = c(1e+16, 1e+14, 1), omega = 2 * pi * 1e+09 * 299792458/wavelength, omega_p = p[1], gamma_p = p[2], epsilon_inf = p[3], ... )drude( wavelength = 633, p = c(1e+16, 1e+14, 1), omega = 2 * pi * 1e+09 * 299792458/wavelength, omega_p = p[1], gamma_p = p[2], epsilon_inf = p[3], ... )
wavelength |
wavelength in nm |
p |
vector of 3 parameters |
omega |
angular frequency in rad/s |
omega_p |
plasma frequency in rad/s |
gamma_p |
damping constant, in rad/s |
epsilon_inf |
background dielectric function |
... |
not used |
a bacground contribution eps_inf is assumed for the core electrons
a data.frame with wavelength in nm and complex dielectric function
Baptiste Auguie
permittivity silver
epsAg(wavelength, epsilon.inf = 4, lambda.p = 282, mu.p = 17000)epsAg(wavelength, epsilon.inf = 4, lambda.p = 282, mu.p = 17000)
wavelength |
wavelength in nm |
epsilon.inf |
background dielectric constant |
lambda.p |
plasma wavelength |
mu.p |
damping constant |
analytical dielectric function of Silver (Drude model)
data.frame
baptiste Auguie
Principles of surface-enhanced Raman spectroscopy and related plasmonic effects Eric C. Le Ru and Pablo G. Etchegoin, published by Elsevier, Amsterdam (2009).
Other user_level permittivity:
epsAu()
require(dielectric) ; data(AgPalik) wvl <- seq(300, 900) silver <- epsAg(wvl) matplot(silver$wavelength, cbind(Re(silver$epsilon), Im(silver$epsilon)), t="l", lty=1, xlab = "wavelength / nm", ylab = "Dielectric function") matpoints(AgPalik$wavelength, cbind(Re(AgPalik$epsilon), Im(AgPalik$epsilon)), pch=1)require(dielectric) ; data(AgPalik) wvl <- seq(300, 900) silver <- epsAg(wvl) matplot(silver$wavelength, cbind(Re(silver$epsilon), Im(silver$epsilon)), t="l", lty=1, xlab = "wavelength / nm", ylab = "Dielectric function") matpoints(AgPalik$wavelength, cbind(Re(AgPalik$epsilon), Im(AgPalik$epsilon)), pch=1)
permittivity gold
epsAu( wavelength, epsilon.infty = 1.54, lambda.p = 177.5, mu.p = 14500, A1 = 1.27, phi1 = -pi/4, lambda1 = 470, mu1 = 1900, A2 = 1.1, phi2 = -pi/4, lambda2 = 325, mu2 = 1060 )epsAu( wavelength, epsilon.infty = 1.54, lambda.p = 177.5, mu.p = 14500, A1 = 1.27, phi1 = -pi/4, lambda1 = 470, mu1 = 1900, A2 = 1.1, phi2 = -pi/4, lambda2 = 325, mu2 = 1060 )
wavelength |
wavelength in nm |
epsilon.infty |
background dielectric constant |
lambda.p |
plasma wavelength |
mu.p |
damping constant |
A1 |
A1 |
phi1 |
phi1 |
lambda1 |
lambda1 |
mu1 |
mu1 |
A2 |
A2 |
phi2 |
phi2 |
lambda2 |
lambda2 |
mu2 |
mu2 |
analytical dielectric function of Au (Drude model + interband transitions)
data.frame
baptiste Auguie
Principles of surface-enhanced Raman spectroscopy and related plasmonic effects Eric C. Le Ru and Pablo G. Etchegoin, published by Elsevier, Amsterdam (2009).
Other user_level permittivity:
epsAg()
require(dielectric) ; data(AuJC) wvl <- seq(300, 900) gold <- epsAu(wvl) matplot(gold$wavelength, cbind(Re(gold$epsilon), Im(gold$epsilon)), t="l", lty=1, xlab = "wavelength / nm", ylab = "Dielectric function") matpoints(AuJC$wavelength, cbind(Re(AuJC$epsilon), Im(AuJC$epsilon)), pch=1)require(dielectric) ; data(AuJC) wvl <- seq(300, 900) gold <- epsAu(wvl) matplot(gold$wavelength, cbind(Re(gold$epsilon), Im(gold$epsilon)), t="l", lty=1, xlab = "wavelength / nm", ylab = "Dielectric function") matpoints(AuJC$wavelength, cbind(Re(AuJC$epsilon), Im(AuJC$epsilon)), pch=1)
Objective function for the Drude model
fit_drude(p, material, ...)fit_drude(p, material, ...)
p |
parameters vector (3) |
material |
data.frame with wavelength in nm and complex epsilon |
... |
passed to drude |
Used to fit a Drude model to a material
sum of squares
Baptiste Auguie
Dielectric dataset
sapphiresapphire
A dielectric reference class with 4 fields
in nm
dielectric function
range of wavelengths
optional information
/https://refractiveindex.info/
Dielectric dataset
TiTi
A dielectric reference class with 4 fields
in nm
dielectric function
range of wavelengths
optional information
/https://refractiveindex.info/