Serializing a dictionary

dic <- list("1" = "one", "2" = "two")

# Encoding binary data
data_b <- serialize(dic, NULL)

# Decoding binary data
dic2 <- unserialize(data_b)
dic2_class <- class(dic2)
# dic2_class = list

str(dic2)
cat("dic2_class =", dic2_class, "\n")