Como repetir um cálculo para cada coluna?

Tenho um conjunto de dados parecido com o seguinte:

V1 V2 V3 ...
1  1  2 ...
1  1  2 ...
2  3  NA...
NA 2  1 ...
2  1  3 ...

it contém 2535 colunas e quero usar o seguinte índice para todas as colunas. Consegui calcular o índice para a primeira coluna.

 ((max(table(df$V1)))-0.5*
             ((table(df$V1)["1"]+table(df$V1)["2"]+table(df$V1)["3"])
              - (max(table(df$V1)))))/(table(df$V1)["1"]+table(df$V1)["2"]+table(df$V1)["3"])

Existe uma maneira de calcular o índice para cada 2535 das colunas? Pensei em usar um loop, mas não consegui escrever um ...

questionAnswers(1)

yourAnswerToTheQuestion