# \donttest{
sa_x13 <- x13(ipi_c_eu[, "FR"], spec = "RSA5c")
wk <- new_workspace()
mp <- new_multiprocessing(wk, "sap1")
add_sa_item(wk, "sap1", sa_x13, "X13")
# A way to retrieve the multiprocessing:
mp <- get_object(wk, 1)
# And the sa_item object:
sa_item <- get_object(mp, 1)
# }
Run the code above in your browser using DataLab