[R-br] Gerar multinomial

Gostaria de saber onde posso achar comandos do R para geração de números aleatórios da distribuição multinomial. Não posso usar o comando rmultinom que existe, preciso implementar algo para três variáveis, teta1, teta2 e teta3. Desde já agradeço.