# Empty list of issues
issues1 <- new_issues()
# List of issues from issue
issue1 <- new_issue(
title = "Une autre issue",
state = "open",
body = "J'ai une question au sujet de...",
number = 2,
created_at = Sys.Date()
)
issues2 <- new_issues(x = issue1)
# Custom issues
issues3 <- new_issues(
title = "Une autre issue",
state = "open",
body = "J'ai une question au sujet de...",
number = 2,
created_at = Sys.Date()
)
issues4 <- new_issues(
title = c("Nouvelle issue", "Une autre issue"),
body = c("Un nouveau bug pour la fonction...",
"J'ai une question au sujet de..."),
state = c("open", "closed"),
number = 1:2,
created_at = Sys.Date()
)
Run the code above in your browser using DataLab