## MAKE TEAMS:
x = c("ashley","daniel","deborah", 
"jaskaran","john","julie","matteo","matthew",
"oliver","sammy","scott","steven","sung",
"trevor","tyler","wilson" )

n = length(x)  ## 16

name1 = c("a","b","c","d","e","f","g","h")

teams = function(){
y = x[sample(n)]
for(i in 1:(n/2)){
cat("\n", name1[i], y[(2*i-1):(2*i)])
}
}

teams()

### HERE ARE THE TEAMS:
 a deborah trevor
 b ashley steven
 c oliver john
 d scott sammy
 e matteo sung
 f tyler daniel
 g matthew julie
 h wilson jaskaran