[R-br] Colocar legenda em histograma com curva de distribuição de weibull

Caros amigo, Estou com os seguintes comandos: hist(Vento[[1]], seq(0, 18, 0.5), prob=TRUE, xlab="Velocidade (m/s)", ylab="Densidade", main="50 m") curve(dweibull(x, shape=2.223, scale=5.534), 0,18,add=T, col='red') Estes comando um gráfico com o histograma e uma linha representando a distribuição de weibull sobre o histograma, gostaria de saber como eu faço para adicionar uma legenda neste gráfico, representando os valores observados (histograma) e os valos estimado (Weibull). Desde já agradeço. ATT -- *Rodrigo A. Muniz* Eng. Agrônomo. Ms Produção Vegetal (UENF) Doutorando em Engenharia de Sistemas Agrícolas (ESALQ/USP) Cel (19) 8300-4333 (Pessoal) Tel (19) 3375-1196 (Residêncial) Tel (19) 3447-8537 (Trabalho)