min pour chaque ligne avec dataframe dans la R

Je vais essayer de faire un simple minimum sur plusieurs colonnes dans une trame de données, mais la fonction min renvoie automatiquement la min sur l'ensemble de chaque colonne plutôt que pour chaque ligne séparément. Je suis sûr que je suis absent quelque chose de vraiment simple ici? Toutes les idées beaucoup apprécié.

x<-c(1,2,7)
y<-c(1,5,4)
minIwant <- c(1,2,4)
df <- data.frame(x,y,minIwant)
df$minIget <- min(df$x,df$y)
df
  x y minIwant minIget
1 1 1        1       1
2 2 5        2       1
3 7 4        4       1
est moins intuitif (pour moi), mais beaucoup plus rapide, pour toute personne qui est en mode d'optimisation.

OriginalL'auteur Rob | 2016-01-08

  1. 19

    Vous pouvez utiliser apply aller à travers chaque ligne

    apply(df, 1, FUN=min)

    Où 1 signifie pour appliquer PLAISIR à chaque ligne de df, 2 reviendrait à appliquer PLAISIR à colonnes.

    excellent merci. Et si j'ai un grand bloc de données comment puis-je spécifier les colonnes de l'application de la aussi du PLAISIR?
    De la même manière que vous le feriez normalement sous-ensemble par colonne, par exemple apply(df[, c(1, 3, 5)], ...).
    Parfait. Merci man =)
    qu'est-ce 1 signifie réellement??
    comme je l'ai dit, 1 des moyens pour appliquer à chaque ligne. Si vous souhaitez appliquer aux colonnes vous utilisez 2!

    OriginalL'auteur nico

  2. 3

    Nous pourrions utiliser pmin, qui trouve le parallèle minima des ensembles de valeurs. Depuis notre df est techniquement une liste, nous aurons besoin de l'exécuter via do.call.

    df$min <- do.call(pmin, df)

    qui donne

    df
#   x y min
# 1 1 1   1
# 2 2 5   2
# 3 7 4   4

    De données:

    df <- data.frame(x = c(1, 2, 7), y = c(1, 5, 4))

    OriginalL'auteur Rich Scriven

  3. 2

    On peut aussi utiliser rowMins de library(matrixStats)

    library(matrixStats)
df$minIwant <- rowMins(as.matrix(df))

    OriginalL'auteur akrun

  4. 1

    Tiens juste à ajouter sur comment vous pouvez le faire aussi avec dplyr.

    library(dplyr)

x<-c(1,2,7)
y<-c(1,5,4)
df <- data.frame(x,y)

df %>% rowwise() %>% mutate(minIget = min(x, y))
# A tibble: 3 x 3
    x     y   minIget
  <dbl> <dbl>   <dbl>
1    1.    1.      1.
2    2.    5.      2.
3    7.    4.      4.

    OriginalL'auteur Nik Muhammad Naim