Skip to main content
2 de 4
Deixando a pergunta um pouco mais impessoal e melhorando o entendimento da pergunta

Uso de if e else

Estou com um problema e não consigo resolver. Estou criando uma função e em determinado momento uso ifs e else. No argumento x da função : develop <- function(x, temp, data) eu deixarei a opção para o usuário colocar 5 strings. Então eu fiz os if e else para caso colocar uma, a função vai fazer determinada coisa e assim por diante. Meu problema é que só está funcionando na primeira opção de string que coloco. Nas outras diz que o objeto não foi encontrado.

calb <- "calb"
if (x == calb & temp == 25){
  cat("O valor de p é:", tabela.calb25[[1]]$"Pr(>F)"[1]) 
  x11()
  boxplot(Peso ~ Idade + Substrato , data = dados.calb25) 
} else if (x == calb & temp == 30){ 
  cat("O valor de p é:", tabela.calb30[[1]]$"Pr(>F)"[1]) 
  x11() 
  boxplot(Peso ~ Idade + Substrato , data = dados.calb30) 
} else if (x == calb & temp == 35){
  cat("O valor de p é:", tabela.calb35[[1]]$"Pr(>F)"[1]) 
  x11() 
  boxplot(Peso ~ Idade + Substrato , data = dados.calb35) 
}else if (x == cmeg & temp == 25){ 
  cat("O valor de p é:", tabela.cmeg25[[1]]$"Pr(>F)"[1]) 
  x11()
  boxplot(Peso ~ Idade + Substrato , data = dados.cmeg25)

E assim vai até eu terminar as 5 opções. Nesse caso funciona a primeira (calb) e por exemplo, a cmeg já da que o objeto não foi encontrado. Eu já tentei colocar o x == "cmeg" porém sem sucesso.

Alguém pode me ajudar ?

Gus
  • 105
  • 1
  • 8