グループ別の合計のパーセンテージを計算するための集計？

Question

DDD <- summarise(
    group_by(Customers, Last_region, Last_state, Last_city),  
    Count = length(Last_city), 
    Total = sum(Customer.Value, na.rm = TRUE), 
    Percent = sum(Customer.Value * 100/sum(Customer.Value, na.rm = TRUE)))  

私はこのコードを試してみました。グループ合計は&ですが、パーセントではありませんか？

Answer 1

Customers$Customer.Valueに変更する必要があります。また、わかりやすくするために、ネストされた機能を使用する代わりに%>%を使用してください。

Customers %>%  
    group_by(Last_region, Last_state, Last_city) %>%  
    summarise(Count = length(Last_city), 
      Total = sum(Customer.Value, na.rm = TRUE), 
      Percent = sum(Customer.Value * 100/
          sum(Customers$Customer.Value, na.rm = TRUE)))  

OPは、任意の再現性の例を示していなかったように、我々はまた、目的のコードを上書きしましたsum(Customer.Value*100