* Encoding: UTF-8.
*** Tamanho da Amostra em função do Intervalo de Confiança
*** Valentim Rodrigues Alferes (Universidade de Coimbra, 2002)
*** valferes@fpce.uc.pt
**
** Esta sintaxe calcula o tamanho de uma amostra teórica em função do
** nível de confiança (NC) e do intervalo de confiança (IC), corrigindo
** o respectivo efectivo no caso de populações finitas.
**
** No output, obterá o tamanho da amostra teórica não corrigido (N_AM)
** e corrigido para populações finitas (N_AM_COR). Caso desconheça o
** tamanho da população indique N_POP = 0 (nestas circunstâncias, o 
** SPSS só lhe dará o tamanho da amostra não corrigido para o tamanho
** da população). Regra geral, a proporção (P) na população do atributo
** a estimar é desconhecida. Por isso, é preferível assumir o valor
** por defeito de P = .50, que representa a situação mais “conserva-
** dora” (i.e., aquela em que o tamanho da amostra será maior).
**
** Exemplo: De acordo com o Recenseamento Eleitoral de Janeiro de 2002,
** o concelho de Coimbra tem 124595 eleitores. Para um nível de con-
** fiança de 95%, qual deverá ser o tamanho da amostra de uma sondagem
** eleitoral para que a margem máxima do erro de amostragem (intervalo
** de confiança) não ultrapasse ±3%?
NEW FILE.
INPUT PROGRAM.
LOOP #X=1 TO 1.
END CASE.
END LOOP.
END FILE.
END INPUT PROGRAM.

* Introduza o nível de confiança (95% por defeito).
COMPUTE NC = 95.

* Introduza o intervalo de confiança (em percentagem).
COMPUTE IC = 3.00.

* Introduza o tamanho da população (se desconhecido, N_POP = 0).
COMPUTE N_POP = 124595.

* Introduza a proporção na população (se desconhecida, P = 0.50).
COMPUTE P = 0.50.
RECODE N_POP(0=SYSMIS).
COMPUTE ICC=IC/100.
COMPUTE Z=IDF.NORMAL(((1-NC/100)/2+NC/100),0,1).
COMPUTE N_AM=(Z*SQRT(P*(1-P))/ICC)*(Z*SQRT(P*(1-P))/ICC).
COMPUTE N_AM_COR=((Z*Z*(P*(1-P))*N_POP))/(Z**2*(P*(1-P))+(N_POP-
1)*ICC**2).
COMPUTE N_AM=TRUNC(N_AM)+1.
COMPUTE N_AM_COR=TRUNC(N_AM_COR)+1.
EXECUTE.
FORMATS N_AM(F8.0) N_AM_COR(F8.0) N_POP(F12.0) NC(F8.2) IC(F8.2) 
P(F8.2).
LIST VARIABLES=N_AM N_AM_COR IC NC P N_POP.