R/cm.r

In nano-optics/dielectric: Defines some physical constants and dielectric functions commonly used in nano-optics

##' clausius_mossotti
##'
##' lorentzian polarizability of a molecule
##' @title clausius_mossotti
##' @param alpha in nm3
##' @param N in nm-3
##' @return relative dielectric function
##' @export
##' @family user_level utility
##' @author baptiste Auguie
clausius_mossotti <- function(alpha =1, N=1e-1){
  (2*N*alpha + 1) / (1 - N*alpha)
}