[R-br] Ajuda em função

[Alexandre Serpa]

tri <- function(x,y,z){
  if ((x +y > z) & (x + z > y) & (y + z > x)){
    if ((x==y) | (y==z)){return ("equilátero")}
    else if ((x==y) | (x==z) | (y==z)){return ("isosceles")}
    else{return ("escaleno")}}
    else{return ("não é triângulo")}}

Alexandre Serpa

Psicólogo
Especialista em Métodos Computacionais Estatísticos
Mestre em Educação
Doutorando em Psicologia
email:   serpa.alexandre em gmail.com


Em 25 de abril de 2013 18:24, Sérgio Henrique almeida da silva ju <
sergio.edfisica em gmail.com> escreveu:

> É verdade, que falta de atenção!
>
> Mas tem uma chave errada nessa função, não estou identificando qual!
>
> Obrigado
>
>
> Em 25 de abril de 2013 18:13, Daniel C Bezerra <danielcbezerra em gmail.com>escreveu:
>
> Vc usou apenas um sinal de "=" após o else
>> On Apr 25, 2013 5:57 PM, "Sérgio Henrique almeida da silva ju" <
>> sergio.edfisica em gmail.com> wrote:
>>
>>> Prezados
>>>
>>> Estou fazendo uma função no R que dado os três lados de um triângulo ele
>>> me diz se é um triângulo, se o mesmo é isósceles, escaleno ou equilátero.
>>>
>>> tri <- function(x,y,z){
>>>   if ((x +y > z) & (x + z > y) & (y + z > x)){
>>>   if ((x==y) | (y==z)){return ("equilátero")}
>>>   else if ((x = y) | (x=z) | (y=z)){
>>>     return ("isosceles")}
>>>   else{
>>>     return ("escaleno")}
>>>      else{
>>>   return ("não é triângulo")}}
>>>
>>>
>>> Porém não estou tendo sucesso, onde posso estar errando?
>>>
>>> Abraços
>>>
>>>
>>> --
>>> Sérgio Henrique Almeida da Silva Junior
>>> Doutorando em Epidemiologia em Saúde Pública
>>> Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ
>>> http://lattes.cnpq.br/1611345552843383
>>> Tel: (21) 68463637 / 94429486
>>>
>>> _______________________________________________
>>> R-br mailing list
>>> R-br em 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.
>>>
>>
>> _______________________________________________
>> R-br mailing list
>> R-br em 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.
>>
>
>
>
> --
> Sérgio Henrique Almeida da Silva Junior
> Doutorando em Epidemiologia em Saúde Pública
> Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ
> http://lattes.cnpq.br/1611345552843383
> Tel: (21) 68463637 / 94429486
>
> _______________________________________________
> R-br mailing list
> R-br em 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.
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130425/96d4d1a1/attachment.html>