[R-br] Combinações de padrão específico

[Leonard de Assis]

Estou com a seguinte situação:

a <- letters[1:4]
expand.grid(a,a) <- não serve pra mim, pois retorna os pares 
(a,a),(b,b), (c,c), (d,d) como combinações
t(combn(a,2)) <- não serve pois retorna (a,b) mas não retorna (b,a)

Preciso de algo q retorne um conjunto de pares como o expand.grid faz, 
mas excluindo as combinações repetidas (a com a, b com b, etc)

Atualmente faço assim:

(a <- letters[1:4])
(b <- expand.grid(a1=a,a2=a))
(final <- subset(b, a1 != a2))

alguma idéia melhor?

Comandos entre parentesis para ilustrar o resultado

-- 
[]s
Leonard de Assis
assis<dot>  leonard<at>  gmail<dot>  com