R Limitations

I would like to know how i could handle the data export with R 

My dataset is more than 10millions line. 

I know that one export is limitted to 150k. 

So I write the following program to split the data into chuncks of data frame to be exported. 

I am getting only the first 150k and the second file is only 1 row.

Could you help me handle this?

numBreaks <- nrow(dataset)%/%150000 + 1
setwd("D:/test/")
for( i in seq(numBreaks)){
  filename = paste("test",i, sep="_")
  filename = paste(filename,"csv",sep=".")
  smallDAT <- dataset[((i-1)*150000+1): (min(nrow(dataset), i*150000)), ]
 write.table (smallDAT , file =filename, sep =",", row.names = FALSE)
}