forgot to update matching functions in shinyapp

README.md

@@ -103,38 +103,32 @@ sapply(biblioverlap_results, class)
 ```
 
 The package also features some functions for plotting the results of
-`biblioverlap()`. For instance, the `plot_matching_summary()` function
+`biblioverlap()`. For instance, the `matching_summary_plot()` function
 can be used to convert the summary of the matching procedure into a bar
 plot.
 
 ``` r
 #Plotting the matching results summary
-plot_matching_summary(biblioverlap_results$summary)
+matching_summary_plot(biblioverlap_results$summary)
 ```
 
-<img src="man/figures/README-matching_summary-1.png" width="100%" />
-
-The `plot_venn()` function uses the UUID column to plot the results of
+The `venn_plot()` function uses the UUID column to plot the results of
 the matching procedure as a Venn diagram.
 
 ``` r
 #Plotting the Venn diagram
-plot_venn(biblioverlap_results$db_list)
+venn_plot(biblioverlap_results$db_list)
 ```
 
-<img src="man/figures/README-venn-1.png" width="100%" />
-
-Similarly, the `plot_upset()` function uses the UUID column to generate
+Similarly, the `upset_plot()` function uses the UUID column to generate
 a UpSet plot, which is generally better for visualizing intersections
 between 5 or more datasets.
 
 ``` r
 #Plotting the UpSet plot
-plot_upset(biblioverlap_results$db_list)
+upset_plot(biblioverlap_results$db_list)
 ```
 
-<img src="man/figures/README-upset-1.png" width="100%" />
-
 The biblioverlap package also features a graphical user interface in the
 form of a ShinyApp, which can be called through the `biblioverApp()`
 function.

inst/biblioverApp/server.R

@@ -188,13 +188,13 @@ server <- function(input, output, session) {
   #### Generating plots (reactive functions)
 
   summary_plot <- reactive( {
-   biblioverlap::plot_matching_summary(calculate_results()$summary,
+   biblioverlap::matching_summary_plot(calculate_results()$summary,
                                         text_size = input$summary_text_size,
                                         size = input$summary_value_size)
   })
 
   venn_plot <- reactive( {
-    biblioverlap::plot_venn(calculate_results()$db_list,
+    biblioverlap::venn_plot(calculate_results()$db_list,
                                     label = input$venn_label,
                                     label_color = input$venn_label_color,
                                     label_size = input$venn_label_size,
@@ -212,7 +212,7 @@ server <- function(input, output, session) {
 
   upset_plot <- reactive ({
     req(input$order.by)
-    biblioverlap::plot_upset(calculate_results()$db_list,
+    biblioverlap::upset_plot(calculate_results()$db_list,
                              nsets = length(calculate_results()$db_list),
                              nintersects = input$nintersects,
                              order.by = input$order.by,