get_room <- function(){
# User provides room number
RoomNum <- readline(prompt="Room Number: ")
# TODO: Validate Room Number is in data base or is "quit"
return(RoomNum)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.