credentials.R

# written globally
credentials <- data.frame(
      # username root belongs to the admin, with root1 as password.
      user = c("user", "root"), # mandatory
      password = c("user1", "root1"), # mandatory
)