Update dic.fit.R