Update k.crusius.R