instructions change

OneProportionResamplingTest/app.R

@@ -73,9 +73,9 @@ ui <- fluidPage(useShinyjs(),
                                                button."),
                                         tags$p("Enter the value of your observed proportion in the text
                                                under the graph. Selecting 'greater/less than' will highlight the
-                                               samples that are greater/less than your value."),
+                                               samples that are greater/less than your observed value."),
                                         tags$p("Selecting 'further from center than' will highlight the samples that are further away
-                                               from the 'Probability of Success' than your value."),
+                                               from the 'Probability of Success' than your observed value."),
                                         tags$p("Press the Reset button whenever you change the Probability of Success
                                                or the Sample Size."),
                                         hr(),