Quiero leer datos de un gran archivo de Excel como este:

Desde la quinta columna, desde la primera fila hasta 140, pero solo 1,3,5,7, ..... 139 (solo 70 valores):

wb <- loadWorkbook("D:\\MA\\excel_mix_meiningen.xlsx")
dat <-readWorksheet(wb, sheet=getSheets(wb)[1], startRow=1, endRow=139, startCol=5, endCol=5)
odds <- function(x) {seq(1, length(x), 2)}
odds(unlist(dat))

pero me sale este error:

Error: OutOfMemoryError (Java): Java heap space

¿Hay otra manera de hacer este trabajo?