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_edgarx
Casemix 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