2016-05-18 59 views
1

我有一個產品的價格每週數據集。這個產品有很多種類,每種都有自己的價格。我有興趣根據各自的銷售量計算加權價格。加權價格與R數據框架

我試圖做一個循環,但不起作用。

有人可以幫助我嗎?

在這裏,我的數據集的一個小例子:

任何

nrow week variety  price volume 
    1 10 Semiduro  911 15550 
    2 10 Semiduro  809 13400 
    3 10 Semiduro  611 15200 
    4 10 Semiduro  517 17250 
    5 10 Semiduro  389 4550 
    6 10 Semiduro  300 1500 
    7 10 Paisana(o)  1100 19200 
    8 10 Paisana(o)  726 22900 
    9 10 Paisana(o)  452 10450 
    10 11 Semiduro  1362 13250 
    11 11 Semiduro  1163 7100 
    12 11 Semiduro  1032 15580 
    13 11 Semiduro  768 9700 
    14 11 Semiduro  703 3670 
    15 11 Semiduro  550 1450 
    16 11 Paisana(o)  1825 20200 
    17 11 Paisana(o)  1402 30650 
    18 11 Paisana(o)  838 9750 
    19 12 Semiduro  1050 11350 
    20 12 Semiduro  878 9200 

回答

3

我們可以使用dplyr

library(dplyr) 
df1 %>% 
    group_by(week, variety) %>% 
    summarise(wprice = weighted.mean(price, volume)) 
# week variety wprice 
# <int>  <chr>  <dbl> 
#1 10 Paisana(o) 808.1598 
#2 10 Semiduro 673.5663 
#3 11 Paisana(o) 1452.2574 
#4 11 Semiduro 1048.4625 
#5 12 Semiduro 972.9976