Dashboard Value Boxes

Articles per Day

articles = computeArticles()
valueBox(articles, icon = "fa-pencil")

45

Comments per Day

comments = computeComments()
valueBox(comments, icon = "fa-comments")

126

Spam per Day

spam = computeSpam()
valueBox(
  spam, icon = "fa-trash",
  color = ifelse(spam > 10, "warning", "primary")
)

15