刚看了楼下的回答， substr(x,start,stop) 是用来提取特定位置的函数，
例如
substr("abcdef", 2, 4) # 提取第2到第4位置的元素[1] "bcd"
获得位置 应该用 grep( )
a<-LETTERS[1:8]
#输出的
#> a
#[1] "A" "B" "C" "D" "E" "F" "G" "H"
grep("D",a,value=F)
# 结果 [1] 4 D在a 中的第四个
# 缺点是这函数一次只能提取一个
#针对这个问题可以设计一个循环 函数 一次可以提取index里面的多个
f<-function(index,x){
a<-c()
for (i in index){
a[i]<-grep(i,x,value=F)
}
return(a)
}
#测试：
x<-a
index<- c("A","D","H")
f(index,x)
结果截图：
