用R语言写出假设等级分数的换算如下， 90分及以上是 A ； 90分以下， 80分及以上是 B ； 80分以下， 70分及以上是 C ；70分以下， 60分及以上是 D ； 60分以下 F. 某门课程一些学生的分数是 100， 97， 96， 78， 65， 56， 88，46， 90. 试求这些学生的等级分数。，用代码的形式

好的，以下是 R 语言代码实现：

# 定义分数和等级之间的转换函数
score_to_grade <- function(score) {
  if (score >= 90) {
    return("A")
  } else if (score >= 80) {
    return("B")
  } else if (score >= 70) {
    return("C")
  } else if (score >= 60) {
    return("D")
  } else {
    return("F")
  }
}

# 定义学生的分数向量
scores <- c(100, 97, 96, 78, 65, 56, 88, 46, 90)

# 使用 sapply 函数将分数向量转换为等级分数向量
grades <- sapply(scores, score_to_grade)

# 输出等级分数向量
grades

输出结果如下：

[1] "A" "A" "A" "C" "D" "F" "B" "F" "A"

这些学生的等级分数分别为 A、A、A、C、D、F、B、F、A。