int.conf.prop<-function(pr,n,NC=0.95){ # Calcul de l'intervalle de confiance en proportion # ********************************************************* # int.conf.prop(pr,n,NC) : # * Variables d'entrées : # * pr : proportion mesurée # * n : la taille de l'échantillon # * NC : seuil de confiance, égal à 0.95 par défaut # * Variables de sortie : # * intervalle de confiance # 2007 by Jérôme BASTIEN # Université Claude Bernard Lyon I, UFRSTAPS, Laboratoire CRIS, Villeurbanne # E-Mail : jerome.bastien@univ-lyon1.fr z<-qnorm((1+NC)/2) return(pr+z*c(-1,1)*sqrt(pr*(1-pr)/n)) }