[R-br] Agrupamento de Tocher no R

Alguém conhece função no R para construir o agrupamento de Tocher? Aproveitando ... alguma função do R obtem a distância euclidiana média? Conheço algumas que fazem apenas a distância euclidiana, como a vegdist() e dist().  Obrigado por qualquer dica. Emmanuel