1000000 / 46
## [1] 21739.13
x <- 1000000 / 46
# x
TABseq(from = 1, to = 10, by = 1)
## [1] 1 2 3 4 5 6 7 8 9 10
+seq(from = 1, to = 10)
## [1] 1 2 3 4 5 6 7 8 9 10
y <- seq(from = 1, to = 10)
y
## [1] 1 2 3 4 5 6 7 8 9 10