optimate: PKG_TITLE

survey.table <- tibble::tribble(
  ~q,    ~question,           ~answer1,    ~answer2,       ~answer3,          ~answer4,
  "q1",  "Season",            "Winter",    "Spring",       "Summer",          "Autumn",
  "q2",  "Colour",            "Red",       "Green",        "Blue",            "Yellow",
  "q3",  "Superhero",         "Superman",  "Wonder Woman", "Batman",          "Spider-Man",
  "q4",  "Food",              "Pizza",     "Salad",        "Burger",          "Pasta",
  "q5",  "TV serie",          "Friends",   "Breaking Bad", "Game of Thrones", "Family Guy",
  "q6",  "Pet",               "Cat",       "Dog",          "Fish",            "Parrot",
  "q7",  "Sport",             "Football",  "Tennis",       "Swimming",        "Skiing",
  "q8",  "Ice cream flavour", "Chocolate", "Vanilla",      "Strawberry",      "Pistachio",
  "q9",  "Outdoor place",     "Beach",     "Forest",       "City",            "Mountains",
  "q10", "Board game",        "Chess",     "Monopoly",     "Scrabble",        "Jenga"
)