# ## Prompts the user to enter two values, quantity and price
#
# groceryBill <- function()
# {
#
# quantity <- readline(prompt="Enter a quantity: ")
# quantity <- as.integer(quantity)
# price <- readline(prompt="Enter a price: ")
# price <- as.integer(price)
#
# if (quantity <= 0 | price <= 0) {
# print("Enter numeric values please.")
# } else {
# return(quantity*price)
# }
#
# }
#
# print(groceryBill())
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.