AT.effective.charge.from.E.MeV.u {libamtrack} | R Documentation |
Effective charge according to Barkas-Bethe-approximation: for particles with given kinetic energy per nucleon
AT.effective.charge.from.E.MeV.u(E.MeV.u, particle.no)
E.MeV.u |
vector of energies of particle per nucleon [MeV] (array of
size n) (see also |
particle.no |
type of the particles in the mixed particle field (array
of size n) (see also |
effective.charge |
Effective charge according to Barkas-Bethe-approximation (array of size n) |
status |
status |
View the C source code here: http://sourceforge.net/apps/trac/libamtrack/browser/trunk/src/AT_PhysicsRoutines.c#L148
# Charge pick-up of several nuclids depending on ion energy df <- data.frame( E.MeV.u = 10^seq(-1, 2, length.out = 50), particle.name = c("1H", "3He", "6Li", "12C", "16O"), effective.charge = 0) for(i in 1:nrow(df)){ df$effective.charge[i] <- AT.effective.charge.from.E.MeV.u( E.MeV.u = df$E.MeV.u[i], particle.no = AT.particle.no.from.particle.name(df$particle.name[i])[1]) }