powered by
medExpenses
with(medExpenses, weighted.mean(expenses, familysize))
Run the code above in your browser using DataLab