如何处理只有Producttype为3的行的数据？我想知道所有产品类型3的中间价。
数据如下：
库（data.table）销售<；-data.table（客户=c（192964929345898477705804188231780611420816171212504526471979524410557152417359435820305268763194757475351933805687813880798327602710785840446891165662），产品类型=c，价格=c（4697218569565541884429502507669427582574992418385629849917370617876337663252599915556313842892724415307900114439456541261881757199308958374409738），季度=c（2,3,3,4,4,4,4,3,3,1,1,1,1,4,1,2,1,3,3,3,4,4,1,1,1,2,3,3,3,3,1,4,1,1,4,4,1,4,1,3,3,1,3,3,4,1,1,2,4,1,4,4,4,1,2,3,2,2,3,3,2,2,1）
谢谢你的帮助。
我希望有人能给我代码并解释它。