[R-br] Ajuda em função

[Sérgio Henrique almeida da silva ju]

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
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20130425/d22cdb76/attachment.html>