Group 1: Exercise 3

How could you change the return value of randomUI() to make the display more attractive?

  1. Changes the layout to show a grid.
ui <- page_fluid(
  layout_column_wrap(
    width = 1/2, height = 450,
    randomUI("num1", "Number 1"), 
    randomUI("num2", "Number 2"), 
    randomUI("num3", "Number 3"),
    randomUI("num4", "Number 4")
  )
)