Я пытаюсь получить средний возраст мужчин и женщин с различными заболеваниями из моей базы данных.

AgeAnalyisi$Age     num
AgeAnalyisi$Gout        logical
AgeAnalyisi$Arthritis   logical
AgeAnalyisi$Vasculitis  logical
etc
AgeAnalysis$Gender      Factor w/ 2 levels

Я могу получить средний возраст индивидуально, используя

mean(AgeAnalysis$Age [AgeAnalysis$Gender=="M" & AgeAnalysis$Gout=="TRUE"] , na.rm = TRUE)

но есть ли более красноречивый способ объединить все это в одну таблицу, чтобы результат среднего возраста был представлен как

          Male  Female
Gout        x   x
Arthritis   x   x
Vasculitis  x   x
etc         x   x

Спасибо