1 / 200 * 30
## [1] 0.15
#> [1] 0.15
(59 + 73 + 2) / 3
## [1] 44.66667
#> [1] 44.66667
sin(pi / 2)
## [1] 1
#> [1] 1
100 / 10
## [1] 10
x <- 100 / 10
TABseq(1, 10)
## [1] 1 2 3 4 5 6 7 8 9 10
#> [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