![]() TextInput("answer2", label = h3(paste("ANSWER 2: ", single_cat_df_5$question)), value = "Enter text."), TextInput("answer1", label = h3(paste("ANSWER 1: ", single_cat_df_5$question)), value = "Enter text."), Paste("Percentage correct", "YOU GOT A: ", num_right) TextInput("answer5", label = h3(paste("QUESTION 5: ", single_cat_df_5$answer)), value = "Enter text."),ĪctionButton("submit_answers", label = "Submit Answers") TextInput("answer4", label = h3(paste("QUESTION 4: ", single_cat_df_5$answer)), value = "Enter text."), TextInput("answer3", label = h3(paste("QUESTION 3: ", single_cat_df_5$answer)), value = "Enter text."), TextInput("answer2", label = h3(paste("QUESTION 2: ", single_cat_df_5$answer)), value = "Enter text."), TextInput("answer1", label = h3(paste("QUESTION 1: ", single_cat_df_5$answer)), value = "Enter text."), #paste joins two strings in r: question 1 AND question from DF #creates text input, label is question, then populates 1st q from df, enter text f|| answer #observe when category is created and create displayed category button New_cat <- sample(unique(as.character(jeop3column$category)), 1) #|| else new category = a new random sample from df, then repeat >=5 Output$Specific_Category =5, category is ok I have the exact same code as I have in my app that is published and works except for what I have at the end where I am attempting to print out the correct answers. How can i specify that I want an specific column for the histogram? Thank you! Warning: Error in [: object of type 'closure' is not subsettable shiny ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |