find data type of vector r

# Create a vector in R
r <- c(1, 2, 3, 4, 5)

# Find the data type of the vector
data_type <- typeof(r)

# Print the data type
print(data_type)