a<-12

# Set up and display vector a

a<-c(1,1,2,3,5)
a

# Display 3rd element of a

a[3]

# Set up and display vector b

b<-c(8,13)
b

# Set up and display vector c

c<-c(a,b)
c

# Display 4th-6th elements of c

c[4:6]