R语言输出向量x中第一次出现5的位置

问题：

请用R语言编写一个函数first5(x)，要求输出在输入向量x中第一次出现5的位置。 若向量x中没有5，则输出“No Finding”

代码：

> first5 <- function(x){
+   wu <- "No finding"
+   a <- 1
+   for(i in 1:length(x)){
+     if(x[i]==5) {
+       print(i)
+       break
+     }
+     a=a+1
+     if(a>length(x)){
+       print(wu)
+     }
+   }
+   
+ }
> x<-c(2,9,15,1,5,8,91)
> first5(x)
[1] 5