Obrigado Marcus.


On 20-08-2014 14:35, Marcus Nunes wrote:
Digite

B

no prompt do R e perceba que o valor de B é NULL. O mesmo vale para C. Eles não estão recebendo os valores numéricos. Fazendo

> exp(2, 5)
O valor de B = 2 elevado a C = 5 é: 32

dá tudo certo.



2014-08-20 14:31 GMT-03:00 Felipe <felipe.e.barletta@gmail.com>:
Prezdos colegas,

Fiz um simples programa para calcular um número real elevado à um expoente inteiro, para treinar um pouco programação no R.
Porém não rodou com o seguinte código e erro:


B <- cat("entre com a base")
2
C <- cat("entre com o expoente inteiro C")
5
exp <- function(B,C)
{
    if (C - as.integer(C)!= 0)
        cat("Entre com expoente inteiro")
    else{
         if (C < 0)
             cat("Só aceitamos expoentes positivos")
         else if (C == 0)
             resp = 1
         else{
             resp = 1
         for (i in 1:C)
             resp = resp*B
         cat ("O valor de B =",B,"elevado a C =",C,"é:",resp)}}
 }
exp(B,C)

Erro em if (C - as.integer(C) != 0) cat("Entre com expoente inteiro") else { (from #3) :
  argumento tem comprimento zero

Se alguém puder ajudar, ficarei muito grato!!


_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.



--
Marcus Nunes
http://marcusnunes.me/


_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.