library(dplyr)
casemix_edgarx <- psy_raa$raa %>%
dplyr::select(no_ipp,nature_acte,categorie_professionnelle_intervenant) %>%
dplyr::group_by(nature_acte) %>%
dplyr::summarise(nb_acte = dplyr::n(),
nb_ipp = dplyr::n_distinct(no_ipp, na.rm = TRUE),
nb_categorie_professionnelle_intervenant = dplyr::n_distinct(categorie_professionnelle_intervenant, na.rm = TRUE)
) %>%
dplyr::arrange(desc(nb_acte)) %>%
dplyr::mutate(percent_acte = nb_acte/sum(nb_acte), .after = nb_acte)
casemix_edgarxCasemix basique EDGARX
Introduction
Pour chaque nature d’acte EDGARX du jeu de données, calcul du nombre d’actes, du nombre d’IPP uniques, du nombre de categories professionnelles d’intervenant différentes et du % en nombre d’actes.
Code
Commentaires
Ligne 3 : psy_raa$raa est un tibble des variables RAA. Voir Guide des scripts - Jeux de données
Ligne 7 : l’option na.rm = TRUE de dplyr::n_distinct() gère les situations où aucun no_ipp n’est renseigné pour tous les actes d’une nature d’acte
Ligne 10 : on trie sur le nombre descendant de nb_acte
Ligne 11 : l’argument .after positionne la variable percent_acte qui vient d’être calculée après nb_acte
Ce casemix est disponible dans l’écran Actes ambulatoires > Casemix EDGARX > Casemix EDGARX de PMSISoft PSY
Etre tenu au courant de la publication des nouveaux scripts PMSI R