# Three different ways to create a vector

# v1: Concatenate directly

v1<-c(-4, 0, 4, 8, 12)
v1

# v2: Create a sequence and multiply by 4

v2<--1:3*4
v2

# v3: Use the seq() function

v3<-seq(-4, 12, by=4)
v3

# Display the final element

v1[5]

# Add the value 10 after the 8

v1<-c(v1[1:4], 10, v1[5])
v1

# Remove the value 0

v1<-c(v1[1], v1[3:6])
v1

# Change the value 4 to 6

v1<-c(v1[1], 6, v1[3:5])
v1

# Display elements [1:6]

v1[1:6]

