Trying to recreate a guessing game using Shiny - how to loop through user input in shiny

[hv11709]

Hi all,

Hope everyone is safe and well.

I have a guessing game that I coded in R. Basically, I have a dataframe with all the states and their capitals. I wrote an R code that displays a random capital and asks user to guess the state. It maintains a count if the user is correct, stops the game at first wrong answer and displays the final count of correct answer. Here is the R code:

count = 0
while (userstate==dataframe_state)
{
  randnum = sample.int(551, 1)
  x = type.convert(randnum,'integer')
  y = df[x,"capital"]
  userstate = readline("which state does this belong to:")
  dataframe_state = df[x,"state"]
  count = count+1
}

paste0("Your Score is:",count)

I want to replicate this in Shiny but am having trouble wrapping my head around how do I loop through the user inputs in Shiny. Also, overall what is the best way to replicate the guessing game in Shiny

All ideas are welcome. I am new to the tool.

Thanks,
NV

[nirgrahamuk]

Help Requested! Shiny Interface: Conditional Output/Variable Carry-Over

library(shiny) ui <- fluidPage( titlePanel("Standard Deviation Estimation Practice"), # Sidebar with a slider input for sample size sidebarLayout( sidebarPanel( sliderInput("samplesize", h3("Enter a positive whole number as a sample size"), min = 10, max = 500, value = 250), actionButton( inputId = "submit_hist", label = "Press for new Histogram" ), numericInput("guess", "What is your estimation of the standard deviation of the data in the histogram?", ""), ), # Show a plot of the generated distribution and pose question mainPanel( plotOutput("distPlot"), textOutput("result") ) ) ) server <- function(input, o…