'[' - Extract or Replace

x <- seq(10, 100, 10)
# First element
x[1]

## [1] 10

# Last element
x[length(x)]

## [1] 100

# First three elements
x[1:3]

## [1] 10 20 30