In nicolas95870/SatisfiRe: SatisfiRe Help You to Analyse Data From Consumers Surver

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

library(SatisfiRe)

La fonction NPS decompose

génére un tableau sur la proportion de détracteurs, neutres, promoteurs à partir du score de recommendation. * Input : reco Output :deux data.frame contenant fréquence et proportion.

NPS_decompose <- function(reco){
  reco = as.numeric(reco)
  detracteurs = sum(reco <=6, na.rm =T)
  neutres = sum(reco ==7 | reco==8, na.rm = T) 
  promoteurs = sum(reco >=9, na.rm = T)
  reco = as.data.frame(rbind(promoteurs,neutres,detracteurs))
  reco_prop = round(as.data.frame(prop.table((reco))*100),1)
  recod = as.data.frame(reco)
  df = cbind(reco_prop,recod)
  colnames(df) = c("frequence", "proportion")
  return(df)
}

NPS_decompose(my_dataset$reco)

nicolas95870/SatisfiRe documentation built on Dec. 22, 2021, 2:14 a.m.