Faire fonctionner le template sur les autres régions

Modifier tous les scripts nécessaires afin que le template fonctionne sur les autres régions. Pour cela se servir du modèle utilisé dans le script tableau_1_6, afin que pour les sources qui ne sont pas disponibles en national, le graphique ou tableau ne s'affiche pas. Ceci est à faire en particulier sur les graphiques utilisant les stocks nouvellement calculés.

méthode:

creation de la fonction inverse

%notin% <- Negate(%in%)

if (code_reg %in% c('52')) { ...... } if (code_reg %notin% c('52')) { return(invisible(NULL)) }