Generate a penalty function

A function to generate penalty functions to use while linking particles

penaltyFunctionGenerator(
  epsilon1 = 0.1,
  epsilon2 = 2,
  lambda1 = 1,
  lambda2 = 1
)

Arguments

epsilon1

A numeric value, to be used in the formula. Jitter for allowing angular displacements

epsilon2

A numeric value, to be used in the formula. Jitter for allowing spatial displacements

lambda1

A numeric value. Multiplicative factor for the penalty function

lambda2

A numeric value. Multiplicative factor applied to the angular displacement

Value

A function object, to be used as penalty function

Author

Federico Marini, marinif@uni-mainz.de, 2014

Examples

custom.function <- penaltyFunctionGenerator(epsilon1=0.1,epsilon2=6,lambda1=1.5,lambda2=0)