numVec <- seq(20,50,by=5)
numVec
## [1] 20 25 30 35 40 45 50