Learn R Programming

dielectric (version 0.2.3)

epsAu: epsAu

Description

permittivity gold

Usage

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)

Arguments

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

Value

data.frame

Details

analytical dielectric function of Au (Drude model + interband transitions)

References

Principles of surface-enhanced Raman spectroscopy and related plasmonic effects Eric C. Le Ru and Pablo G. Etchegoin, published by Elsevier, Amsterdam (2009).

See Also

Other user_level permittivity: epsAg

Examples

Run this code
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)

Run the code above in your browser using DataLab