Update campagne.R