条件运算符 在 R 中构建条件

Question

如果向量ma​​rks（作为参数传递）中的所有数字都大于110，我需要建立一个条件。如果是，则分配字符串“top”给变量 M，否则赋值 "Down"

我试着做这个，但它并不认为我是正确的

classmark<-function(marks){


    V1 <- marks > 110
    V<- ifelse(V1 == TRUE,"Best Class","Needs Improvement")
    
    return(V)
    }
    print(classmark(c(120,195,914,56)))
    print(classmark(c(130,295,294,196)))

这是原始代码

    classmark<-function(marks){
    
        # Enter your code here. Read input from STDIN. Print output to STDOUT
        V<-
        
        return(V)
        }
    print(classmark(c(120,195,914,56)))
    print(classmark(c(130,295,294,196)))

Answer 1

classmark <- function(marks) {
    if (all(marks > 110)) {
        "top"
    } else {
        "Down"
    }
}
M <- classmark(c(120,195,914,56))
M
#> [1] "Down"
M <- classmark(c(130,295,294,196))
M
#> [1] "top"