Como aplicar uma função a cada linha de uma matriz ou quadro de dados em r

Você pode usar a função apply() para aplicar uma função a cada linha de uma matriz ou quadro de dados em R.

Esta função usa a seguinte sintaxe básica:

aplicar (X, MARGEM, DIVERSÃO)

Ouro:

• X: Nome da matriz ou bloco de dados.
• MARGEM: Dimensão na qual realizar a operação. Use 1 para linha e 2 para coluna.
• DIVERSÃO: A função a ser aplicada.

Os exemplos a seguir mostram como usar essa sintaxe na prática.

Exemplo 1: aplique uma função a cada linha da matriz

Suponha que temos a seguinte matriz em R:

 #create matrix
mat <- matrix(1:15, nrow= 3 )

#view matrix
mast

     [,1] [,2] [,3] [,4] [,5]
[1,] 1 4 7 10 13
[2,] 2 5 8 11 14
[3,] 3 6 9 12 15

Podemos usar a função apply() para aplicar diferentes funções às linhas da matriz:

 #find mean of each row
apply(mat, 1, mean)

[1] 7 8 9

#find sum of each row
apply(mat, 1, sum)

[1] 35 40 45

#find standard deviation of each row
apply(mat, 1, sd)

[1] 4.743416 4.743416 4.743416

#multiply the value in each row by 2 (using t() to transpose the results)
t(apply(mat, 1, function (x) x * 2))

     [,1] [,2] [,3] [,4] [,5]
[1,] 2 8 14 20 26
[2,] 4 10 16 22 28
[3,] 6 12 18 24 30

#normalize every row to 1 (using t() to transpose the results)
t(apply(mat, 1, function (x) x / sum(x) ))

           [,1] [,2] [,3] [,4] [,5]
[1,] 0.02857143 0.1142857 0.2 0.2857143 0.3714286
[2,] 0.05000000 0.1250000 0.2 0.2750000 0.3500000
[3,] 0.06666667 0.1333333 0.2 0.2666667 0.3333333

Observe que se você quiser encontrar a média ou soma de cada linha, é mais rápido usar as funções internas rowMeans() ou rowSums() :

 #find mean of each row
rowMeans(mat)

[1] 7 8 9

#find sum of each row
rowSums(mat)

[1] 35 40 45

Exemplo 2: Aplicar uma função a cada linha do quadro de dados

Suponha que temos a seguinte matriz em R:

 #create data frame
df <- data. frame (var1=1:3,
                 var2=4:6,
                 var3=7:9,
                 var4=10:12,
                 var5=13:15)

#view data frame
df

  var1 var2 var3 var4 var5
1 1 4 7 10 13
2 2 5 8 11 14
3 3 6 9 12 15

Podemos usar a função apply() para aplicar diferentes funções às linhas do quadro de dados:

 #find mean of each row
apply(df, 1, mean)

[1] 7 8 9

#find sum of each row
apply(df, 1, sum)

[1] 35 40 45

#find standard deviation of each row
apply(df, 1, sd)

[1] 4.743416 4.743416 4.743416

#multiply the value in each row by 2 (using t() to transpose the results)
t(apply(df, 1, function (x) x * 2))

     var1 var2 var3 var4 var5
[1,] 2 8 14 20 26
[2,] 4 10 16 22 28
[3,] 6 12 18 24 30

#normalize every row to 1 (using t() to transpose the results)
t(apply(df, 1, function (x) x / sum(x) ))

           var1 var2 var3 var4 var5
[1,] 0.02857143 0.1142857 0.2 0.2857143 0.3714286
[2,] 0.05000000 0.1250000 0.2 0.2750000 0.3500000
[3,] 0.06666667 0.1333333 0.2 0.2666667 0.3333333

Semelhante às matrizes, se você quiser encontrar a média ou soma de cada linha, é mais rápido usar as funções rowMeans() ou rowSums() integradas:

 #find mean of each row
rowMeans(df)

[1] 7 8 9

#find sum of each row
rowSums(df)

[1] 35 40 45

Recursos adicionais

Como recuperar números de linha em R
Como executar uma função CONT.SE em R
Como executar uma função SUMIF em R