データベースの各行の Gini インデックスを計算しようとしています。各行は顧客で、各列は月間セッションです。だから私がする必要があるのは、12 か月間の顧客ごとに、行ごとに Gini インデックスを含む列を追加することです。 添付の例を参照
オンラインでいくつかの例を見つけて、これを行いました:
Gini_index <- apply(DT_file[,c('sessions_201607_pct','sessions_201608_pct', 'sessions_201609_pct','sessions_201610_pct','sessions_201611_pct','sessions_201612_pct','sessions_201701_pct','sessions_201702_pct','sessions_201703_pct','sessions_201704_pct','sessions_201705_pct','sessions_201706_pct')], 1, gini)
ただし、次のエラーが表示されます。
match.fun(FUN) のエラー: オブジェクト 'gini' が見つかりません
Ineq と Reldist (およびライブラリ) の両方をインストールしたので、これが機能しない理由がわかりません。