diff --git a/README.md b/README.md index d3d1b0a..3253adf 100644 --- a/README.md +++ b/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) ``` - - -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) ``` - - -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) ``` - - The biblioverlap package also features a graphical user interface in the form of a ShinyApp, which can be called through the `biblioverApp()` function. diff --git a/inst/biblioverApp/server.R b/inst/biblioverApp/server.R index 1c89710..b3c771a 100644 --- a/inst/biblioverApp/server.R +++ b/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,