library(adventofcode2019)
input05 <- as.integer(strsplit(readLines(input_file(5)), ',')[[1]])
invisible(diagnostic_program(input05, input = 1))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.