x<-c("a","b","c","d","e","f")
y<-rep(c(3,4,5,8),6)
z<-rep(c(23,24,25,26,27,28),6)
name1<-sprintf("Pred_pres_%s_indpdt[,%s,,]",x,y)
name2<-sprintf("population[,%s]",z)
rank<-function(i,j){
for(i in name1){
for(j in name2){
somers2(i,j)
}}}
rank(name1,name2)
waltzmie
I believe this is a little bit closer:
rank<-function(i,j){
for(i in name1){
for(j in name2){
somers2(i,j)
}}}
rank(name1,name2)
bu still not there
waltzmiester wrote:
>
> I appreciate all the help I have received from this list and also not
> being flamed because
2 matches
Mail list logo