第三关 输出最大数 ifelse函数

参考GPT和自己的思路：

这是一个求最大数的问题，可以使用ifelse函数来实现。具体代码如下：

a <- c(5,3,9,2,8)
max_num <- ifelse(a == max(a), a, 0)
max_num

这个代码会将a中最大的数提取出来，并将其他数变成0。输出结果为最大的数。