Generate a small plot that will be enlarged in a modal when clicked

join_sets(x, y, by = NULL, ...)

Arguments

x

a dataset

y

another dataset

by

variables you plan to merge on

...

passed to dplyr join functions

Examples

# will generate figures in a temporary directory if (requireNamespace("dplyr", quietly = TRUE)) { data("band_members", package = "dplyr") data("band_instruments", package = "dplyr") band_instruments2 <- dplyr::bind_rows(band_instruments, band_instruments[1,]) join_sets(band_members, band_instruments2) }
#> dev.new(): using pdf(file="Rplots4.pdf")
#> dev.new(): using pdf(file="Rplots5.pdf")
#> dev.new(): using pdf(file="Rplots6.pdf")
#> dev.new(): using pdf(file="Rplots7.pdf")
#> No viewer found, probably checking
#> #> #> #> # Merge info #> #> There are <big>0</big> duplicated rows in band_members out of 3 total rows. #> #> There are <big>2</big> duplicated rows in band_instruments2 out of 4 total rows. #> #> <details> #> <summary>2 rows overlap between band_members and band_instruments2</summary> #> #> #> figure/a538d47a55_unnamed-chunk-4-1.pdf #> #> #> </details> #> #> <details> #> <summary>1 rows are in band_members but have no corresponding rows in band_instruments2</summary> #> #> figure/a538d47a55_unnamed-chunk-5-1.pdf #> #> </details> #> #> <details> #> <summary>1 rows are in band_instruments2 but have no corresponding rows in band_members</summary> #> #> figure/a538d47a55_unnamed-chunk-6-1.pdf #> #> </details> #> #> <script> #> $(function() { #> $('details').on('toggle', function() { #> if(this.open) { #> // jquery $('window').resize or $('window').trigger('resize') do not work #> window.dispatchEvent(new Event('resize')); #> } #> }) #> }) #> </script>