library(dplyr)
rps_episode_soin_continu <- psy$rps$rps %>%
dplyr::select(forme_activite,ipp,no_sejour,date_debut_sequence,date_fin_sequence,nb_jours_presence) %>%
dplyr::filter(forme_activite %in% c("01","01D","01S","01P","02","03","04","05","06","07")) %>%
dplyr::group_by(ipp) %>%
dplyr::arrange(date_debut_sequence, .by_group = TRUE) %>%
dplyr::mutate(same_episode_soin_continu_ipp = as.integer(date_debut_sequence-dplyr::lag(date_fin_sequence, default = date_debut_sequence[1])) <= 1L,
cumsum_episode_soin_continu_ipp = cumsum(!same_episode_soin_continu_ipp)+1L,
nb_episode_soin_continu_ipp = max(cumsum_episode_soin_continu_ipp)) %>%
dplyr::ungroup()
rps_episode_soin_continu
ipp_episode_soin_continu <- rps_episode_soin_continu %>%
dplyr::distinct(ipp,no_sejour,nb_episode_soin_continu_ipp) %>%
dplyr::mutate(.by = ipp, nb_sejour_ipp = dplyr::n()) %>%
dplyr::distinct(ipp,nb_sejour_ipp,nb_episode_soin_continu_ipp)
ipp_episode_soin_continu
Episodes de soin continu par IPP
Introduction
Pour la définition des épisodes de soin continu en hospitalisation complète, voir ici
Dans une première étape, sur la base des RPS de temps complet, on repère et comptabilise par IPP, les épisodes de soin continu.
Dans une 2eme étape, on passe en IPP et on calcule le nombre de séjours de l’IPP.
Au final, on a un tibble par IPP avec, pour chaque IPP, le nombre de séjours temps complet et le nombre d’épisodes soin continu.
Code
Commentaires
Ligne 7 : l’argument .by_group = TRUE
dans le dplyr::arrange()
permet de trier au sein d’un regroupement.
Ligne 9 : le +1L est là pour faire démarrer le comptage des épisodes de soin continu à 1 et non à 0
Pour aller + loin :
Repérage concomitant des épisodes de soin concentré (séquences séparées de 0 à 7 jours dans un même épisode)
Attribution d’un code aux épisodes de soin continu
PMSISoft PSY Standard :voir écran Séjours > Base des séjours
, affichage du nombre d’épisodes de soin continu et du nombre d’épisodes de soin concentré au dessus du tableau de résultats.
PMSISoft PSY Professionnel : voir écran Séjours > Base des séjours
, calcul, pour chaque séjour, des variables ordre_episode_soin_continu_ipp
, nb_episode_soin_continu_ipp
, ordre_episode_soin_concentre_ipp
et nb_episode_soin_concentre_ipp
Etre tenu au courant de la publication des nouveaux scripts PMSI R