提取R中列的最高和最低值，以及行标识符

# 创建一个示例数据框
data <- data.frame(
  ID = c(1, 2, 3, 4, 5),
  Value = c(10, 20, 15, 5, 25)
)

# 提取列的最高值和最低值
max_value <- max(data$Value)
min_value <- min(data$Value)

# 输出最高值和最低值
print(max_value)
print(min_value)

# 创建一个示例数据框
data <- data.frame(
  ID = c(1, 2, 3, 4, 5),
  Value = c(10, 20, 15, 5, 25)
)

# 提取值为最高值和最低值的行标识符
max_value <- max(data$Value)
min_value <- min(data$Value)
max_rows <- which(data$Value == max_value)
min_rows <- which(data$Value == min_value)

# 输出最高值和最低值的行标识符
print(max_rows)
print(min_rows)