# Add Legends to Bubble Plots

### Description

This functions can be used to add legends to bubble plots

### Usage

1 2 |

### Arguments

`x, y` |
the x and y co-ordinates to be used to position the legend. They can be specified by keyword or in any way which is accepted by xy.coords. The location may also be specified by setting x to a single keyword from the list "bottomright", "bottom", "bottomleft", "left", "topleft", "top", "topright", "right" and "center". This places the legend on the inside of the plot frame at the given location. Partial argument matching is used. The optional inset argument specifies how far the legend is inset from the plot margins. If a single value is given, it is used for both margins; if two values are given, the first is used for x- distance, the second for y-distance |

`z` |
a numeric vector whose values were used to define the points expansion factor (bubbles) of the plot |

`nleg` |
integer indicating the number of values (quantiles) to be drawn in the legend. The default is "3" which will return the minimum, median and maximum values of |

`digits` |
integer indicating the number of decimal places to be used on legend. Default is "1" |

`pch` |
the plotting symbols appearing in the legend, either as vector of 1-character strings, or one (multi character) string. Must be the same used on plotting |

`z.cex.range` |
vector of length 2. Minimum and maximum 'cex' of the bubbles plotted. Replace the argument |

`x.intersp` |
character interspacing factor for horizontal (x) spacing |

`y.intersp` |
the same for vertical (y) line distances |

`bg` |
the background color for the legend box |

`...` |
further graphical parameters. See legend() for additional options |

### Details

This is a "wrapper" function for legend() that adds bubbles - legend() should be consulted for details.`legend.bubbles`

was designed to plot legends to bubbles for the `rysgran.plot`

and `rysgran.ternary`

functions. For this, the values of `z`

, `z.cex.range`

and `pch`

should be the same used to plot the graph and `legend.bubbles`

. To avoid problems with overlapping symbols and characters due to the different sizes of `pch`

, arguments `x.intersp`

, `y.intersp`

and `cex`

should be adjusted accordingly. Note that the option 'bty="n"' from legend is hardcoded to avoid overlapping

### Note

`legend.bubbles`

depends on the package 'soiltexture'

### Author(s)

Eliandro R. Gilbert (eliandrogilbert@gmail.com)

### See Also

`rysgran.plot`

, `rysgran.ternary`

### Examples

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 | ```
#Shepard diagram with Sorting as bubbles
#Calculating the percentage of weight in each textural class
library(rysgran)
data(camargo2001)
percent <- class.percent(camargo2001, mode="total")
#Calculating the grain size statistics
rys <- gran.stats(camargo2001 , method="folk")
#Plotting
rysgran.ternary (x = percent[2:4], method = "shepard",
z = rys$Sorting, z.cex.range = c(0.5,4), col = "blue", pch = 20)
legend.bubbles ("topright", z=rys$Sorting , nleg=4, pch=20, col="blue",cex=1,
z.cex.range=c(0.5,4), x.intersp=1.2, y.intersp=1.2,digits=1, title="Sorting")
#Bivariated Plot
#Mean and Sorting with Kurtosis as bubbles
library(rysgran)
data(camargo2001)
#Calculating the grain size statistics
rys <- gran.stats(camargo2001 , method="folk")
#Ploting
rysgran.plot ("mean" , "sort" , data=camargo2001, method="folk", pch = 21,
col = "red", z=rys$Kurtosis, z.cex.range=c(1,5),bg="red")
legend.bubbles ("bottomright", z=rys$Kurtosis , nleg=3, pch=21, col="black",
z.cex.range=c(1,5), x.intersp=1.3, y.intersp=1.6, digits=1, title="Kurtosis")
``` |