Suppression de chaque nième ligne dans une base de données

Comment puis-je supprimer tous les n-ième ligne à partir d'un dataframe dans la R?

source d'informationauteur Yktula

  1. 33

    Vous pouvez créer une fonction, comme suit

    Nth.delete<-function(dataframe, n)dataframe[-(seq(n,to=nrow(dataframe),by=n)),]

    Nous allons tester

    DF<-data.frame(A=1:15, B=rnorm(15), C=sample(LETTERS,15))
Nth.delete(DF, 3)
  2. 9

    Si vous voulez obtenir le chaque de la n-ième colonne à partir d'une trame de données ou vecteur etc utiliser le modulo....

    Sélectionnez la nième colonnes en répétant les jeux
    ici comme modulo 3 (choisir nième comme vous le désirez)

    > x <- c(1,2,3,4,5,6)
> d <- rbind(x,x,x)
> df <- as.data.frame(d, row.names=T)
> c <- 1:ncol(df)
> c
[1] 1 2 3 4 5 6
c%%3   ### nth cycle, here every 3
[1] 1 2 0 1 2 0

#select the every 3rd column of every 3
> df[, c%%3==0]  
  V3 V6
1  3  6
2  3  6
3  3  6

#every first column of every 3
> df[, c%%3==1]
  V1 V4
1  1  4
2  1  4
3  1  4

#every 2nd column of every 3
> df[, c%%3==2]
  V2 V5
1  2  5
2  2  5
3  2  5


#drop the 3rd columns  
> df[, !(c%%3==0)]
  V1 V2 V4 V5
1  1  2  4  5
2  1  2  4  5
3  1  2  4  5

    etc... swap c<-nrow(df). les lignes..

  3. 1

    Je tiens à ajouter les tidyverse approche de style à ce problème, en utilisant le %% opérateur.

    library(dplyr)
df <- data_frame(V1 = seq(1, 26), V2 = letters)
df %>% dplyr::filter(row_number() %% 2 != 0) ## Delete even-rows
df %>% dplyr::filter(row_number() %% 2 != 1) ## Delete odd-rows
df %>% dplyr::filter(row_number() %% 3 != 1) ## Delete every 3rd row starting from 1

    Vous pouvez utiliser la même idée à sélectionnez tous les n-ième ligne, bien sûr. Voir ici