## develop lists
dinner <- list(Entree="Spaghetti and Meatballs",
Starter="Caesar Salad", Dessert="Spumoni",
Beverage="Wine and Water")
## oops, we are all out of spumoni and we just got
## some tiramisu in from the local bakery
change <- list(Dessert="Tiramisu",Note="Please tip your waiter")
## merge the lists and prett-print
prettyPrintList(mergeList(dinner, change), header="What's for dinner?")
Run the code above in your browser using DataLab