237000/50
## [1] 4740
x <- 237000/50
x
## [1] 4740
TABseq(from = 1, to = 10, by = 2)
## [1] 1 3 5 7 9
+seq(from = 1, to = 15)
## [1] 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
y<- seq(from = 1, to = 10)
y
## [1] 1 2 3 4 5 6 7 8 9 10