4

What is the most elegant way to delete every even/uneven row from a data-frame in R? My first try was to enter the numbers of every second row "by hand" (See below)

(SmallerDataFrame <- OriginalDataFrame[-c(2,4,6,8,10,12),])
Ferdi
  • 540
  • 3
  • 12
  • 23

1 Answers1

15

Try this

dat <- mtcars$cyl
toDelete <- seq(0, length(dat), 2)

toDelete

dat <-  dat[-toDelete, ]

For data frame,

dat <- mtcars
toDelete <- seq(1, nrow(dat), 2)
dat[ toDelete ,]
Rich Scriven
  • 97,041
  • 11
  • 181
  • 245
USER_1
  • 2,409
  • 1
  • 28
  • 28