# Numeric vector
prime_numbers <- c(2, 3, 5, 7, 11, 13, 17, 19)
# Character vector
game_list <- c("soccer", "hockey", "basketball")
# A list holds mixed types
host_and_port <- list("192.168.100.1", 3002)
# A list of employees, each one a named list
employees <- list(
list(first_name = "Anton",
last_name = "Pavlov"),
list(first_name = "Elena",
last_name = "Kirienko"))
# A typed vector filled in advance
zeros <- numeric(3)
cat("prime_numbers =", prime_numbers, "\n")
cat("game_list =", game_list, "\n")
str(host_and_port)
str(employees)
cat("zeros =", zeros, "\n")