1

顧客に関する情報と、顧客が費やした金額を含む一連のデータがあります。各顧客は 1 回だけ表示されます。

customer<-c("Andy","Bobby","Oscar","Oliver","Jane","Cathy","Emma","Chris")
age<-c(25,34,20,35,23,35,34,22)
gender<-c("male","male","male","male","female","female","female","female")
moneyspent<-c(100,100,200,200,400,400,500,200)

data<-data.frame(customer=customer,age=age,gender=gender,moneyspent=moneyspent)

男性と女性の顧客が費やした平均金額を計算したい場合は、tapply を使用できます。

tapply(moneyspent,gender,mean)

与える:

female   male 
  375    150

ただし、性別と年齢層の両方で費やされた平均金額を見つけたいと思っています。私が目指している結果は次のとおりです。

 Male Age 20-30      Female Age 20-30      Male Age 30-40      Female Age 30-40
    150                     300                 150                   450

これらの結果が得られるように、どのようにタップコードを変更できますか?

ありがとうございました

4

2 に答える 2