Prezados,
tenho um banco com causas de readmissões e tempos entre as internações. Queria criar uma coluna com o tempo médio de cada grupo de causas. 
Alguém pode me ajudar?
Obrigada.
nome=c("Ricardo","Maria","Tereza","Pedro","José", "Germano","Paula","Clea")
tempo=c(68,3,14,89,7,50,30,5)
causa=c("circ","resp","osteo","resp","circ","circ","osteo","osteo")
banco1=cbind(nome,tempo,causa)
banco1=data.frame(banco1)
banco1