【问题描述】
请用R语言编写一个函数first5(x),要求输出在输入向量x中第一次出现5的位置。
若向量x中没有5,则输出“No Finding”
【测试样例】
输入1:
x<-c(2,9,15,1,5,8,91)
输出1:
5
输入2:
x<-c(2,9,15,1,12,8,91)
输出2:
No Finding
【算法代码】
first5 <- function(x) {
for (i in 1:length(x)) {
if (x[i] == 5){
return(i)
break # break out of loop
}
}
print("No finding")
}
x<-c(2,9,15,1,5,8,91)
first5(x)
x<-c(2,9,15,1,12,8,91)
first5(x)