my_file <- adfeR::get_data_file('grunfeld.csv') df_grunfeld <- read_csv(my_file, col_types = cols()) # solution glimpse(df_grunfeld) my_sol <- nrow(df_grunfeld)
my_answers <- make_random_answers(my_sol) #check_answers(my_answers)
Use função adfeR::get_data_file
e readr::read_csv
para importar os dados do arquivo grunfeld.csv
. Em seguida, utilize funções dplyr::glimpse
para descobrir o número de linhas nos dados importados.
exams::answerlist(my_answers, markup = "markdown")
extype: num
exsolution: r my_sol
exname: "grunfeld"
exshuffle: TRUE
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.