Skip to main content
Reversão para edição 2 - Leia https://pt.meta.stackoverflow.com/questions/6300/
Fonte Link
NoobSaibot
  • 9,8mil
  • 6
  • 29
  • 53

Estou com um problema e não consigo resolver.
  Estou criando uma função e em determinado momento uso ififs e elseelse.
  No argumento xx da função : develop <- function(x, temp, data)develop <- function(x, temp, data) eu deixarei a opção para o usuário colocar 5 strings. Então eu fiz os ifif e elseelse para caso colocar uma, a função vai fazer determinada coisa e assim por diante.

Meu Meu problema é que só está funcionando na primeira opção de string que coloco. Nas outras diz que o objeto não foi encontrado.

Nota: o código foi simplificado por mim, usuário Rui Barradas. É exatamente equivalente ao original. Havia chamads a x11 e boxplot a cada if, o que é completamente desnecessário.

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

x11()
  boxplot(Peso ~ Idade + Substrato , data = dados.cmeg25) 

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

Alguém pode me ajudar  ?

Estou com um problema e não consigo resolver.
  Estou criando uma função e em determinado momento uso if 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.

Nota: o código foi simplificado por mim, usuário Rui Barradas. É exatamente equivalente ao original. Havia chamads a x11 e boxplot a cada if, o que é completamente desnecessário.

calb <- "calb"
if (x == calb) {
    if (temp == 25) {
        cat("O valor de p é:", tabela.calb25[[1]]$"Pr(>F)"[1], "\n")
        dados <- dados.calb25
    } else if (temp == 30) {
        cat("O valor de p é:", tabela.calb30[[1]]$"Pr(>F)"[1], "\n")
        dados <- dados.calb30
    } else if (temp == 35) {
        cat("O valor de p é:", tabela.calb35[[1]]$"Pr(>F)"[1], "\n")
        dados <- dados.calb35
    }
} else {
    if (x == cmeg) 
        if (temp == 25) {
            cat("O valor de p é:", tabela.cmeg25[[1]]$"Pr(>F)"[1], "\n")
            dados <- dados.cmeg25
        }
}

x11()
boxplot(Peso ~ Idade + Substrato, data = dados) 

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

Alguém pode me ajudar?

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 cmegda que o objeto não foi encontrado. Eu já tentei colocar o x == "cmeg" porém sem sucesso.

Alguém pode me ajudar  ?

Código simplificado, com uma explicação do motivo.
Fonte Link
Rui Barradas
  • 19mil
  • 2
  • 14
  • 28

Estou com um problema e não consigo resolver. 
Estou criando uma função e em determinado momento uso ifsif e elseelse. 
No argumento xx da função : develop <- function(x, temp, data)develop <- function(x, temp, data) eu deixarei a opção para o usuário colocar 5 strings. Então eu fiz os ifif e elseelse para caso colocar uma, a função vai fazer determinada coisa e assim por diante. Meu

Meu problema é que só está funcionando na primeira opção de string que coloco. Nas outras diz que o objeto não foi encontrado.

Nota: o código foi simplificado por mim, usuário Rui Barradas. É exatamente equivalente ao original. Havia chamads a x11 e boxplot a cada if, o que é completamente desnecessário.

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

x11()
  boxplot(Peso ~ Idade + Substrato , data = dados.cmeg25) 

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

Alguém pode me ajudar  ?

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 cmegda que o objeto não foi encontrado. Eu já tentei colocar o x == "cmeg" porém sem sucesso.

Alguém pode me ajudar  ?

Estou com um problema e não consigo resolver. 
Estou criando uma função e em determinado momento uso if 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.

Nota: o código foi simplificado por mim, usuário Rui Barradas. É exatamente equivalente ao original. Havia chamads a x11 e boxplot a cada if, o que é completamente desnecessário.

calb <- "calb"
if (x == calb) {
    if (temp == 25) {
        cat("O valor de p é:", tabela.calb25[[1]]$"Pr(>F)"[1], "\n")
        dados <- dados.calb25
    } else if (temp == 30) {
        cat("O valor de p é:", tabela.calb30[[1]]$"Pr(>F)"[1], "\n")
        dados <- dados.calb30
    } else if (temp == 35) {
        cat("O valor de p é:", tabela.calb35[[1]]$"Pr(>F)"[1], "\n")
        dados <- dados.calb35
    }
} else {
    if (x == cmeg) 
        if (temp == 25) {
            cat("O valor de p é:", tabela.cmeg25[[1]]$"Pr(>F)"[1], "\n")
            dados <- dados.cmeg25
        }
}

x11()
boxplot(Peso ~ Idade + Substrato, data = dados) 

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

Alguém pode me ajudar?

Deixando a pergunta um pouco mais impessoal e melhorando o entendimento da pergunta
Fonte Link

tudo bem ? EstouEstou com um problema e não consigo resolver. Estou criando uma função, e em determinado momento uso ifsifs e elseelse. No argumento x da função : develop <- function(x, temp, data) eu deixarei a opção para o usuário jogarcolocar 5 strings. DaíEntão eu fiz os ifif e elseelse para caso jogarcolocar 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 doucoloco. 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"x == "cmeg" porém sem sucesso...

Alguém pode me ajudar ?

tudo bem ? 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 jogar 5 strings. Daí eu fiz os if e else para caso jogar 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 dou. 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 ?

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 ?

Fonte Link
Gus
  • 105
  • 1
  • 8
Carregando