通过子集

Question

我从营销广告系列中获得以下数据

 SegmentPriority    MarketingLInkClicked    Campaigntype    ProductSeries
    Low             184.00                  Promotional       A
  Medium            249.00                  Promotional         A
  Medium            0.00                     Promotional        A
   High             10.00                    Resale             B
  Medium           48.00                     Resale             B
    Low             9.00                 Promotional         Misc
   Medium           94.00                Promotional            C
   Medium           318.00                  Promotional         C
    Medium          156.00               Promotional            D
    Medium          67.00                 Resale                 D
    High             3.00                  Buyback               C
    High             622.00                 Buyback              C

我已经对数据帧进行了子集化，以使用dplyr缩放第二列中给出的值。子集化是通过campaignigntype，segment priority和product series。我想将预测值转换为原始形式。我手动做同样的事。

我如何通过循环/包

来做同样的事情

注意：我使用以下代码对数据进行子集化并缩放相同的

   df %>%
  group_by(SegmentPriority,Campaigntype, ProductSeries) %>%
  mutate_each(funs(scale), MarketingLInkClicked)

这应该生成一个子集化变量的缩放版本。