Create messages for chat()
function.
Examples
messages <- create_messages(
create_message("be nice", "system"),
create_message("tell me a 3-word joke")
)
messages <- create_messages(
list(role = "system", content = "be nice"),
list(role = "user", content = "tell me a 3-word joke")
)