[R-br] Ajuda com Função poder

Gente, alguém poderia me dar uma luz de como construir a função poder para um teste de hipóteses desse jeito: lançando uma moeda 10 vezes e quero testar isso: H0: p=0.5 H1: p diferente de 0.5 A questão fornece a regiao critica e pede para construir a função poder. Resolvendo tudo, cheguei : P(0.6 - p)/sqrt(p*(1-p)/10) - P (0.4 - p)/sqrt(p*(1-p)/10) Como poderia começar a construir a função poder nesse caso? Abraços!