Draw a hand-drawn bounding shape around each group of points - the sketch
analogues of ggforce::geom_mark_circle() / geom_mark_ellipse() /
geom_mark_rect(), completing the family started by
geom_sketch_mark_hull(). Group the points with an aesthetic such as
group, colour, or fill; each group gets its own mark. With fill
mapped the mark is shaded (using fill_style); otherwise it is outline-only.
The position scales expand to contain the marks, so they are not clipped.
GeomSketchMarkCircleGeomSketchMarkEllipse
GeomSketchMarkRect
geom_sketch_mark_circle(
mapping = NULL,
data = NULL,
stat = "identity",
position = "identity",
...,
expand = 0.05,
roughness = 1,
bowing = 1,
n_passes = 2L,
seed = NULL,
fill_style = "hachure",
hachure_angle = 45,
hachure_gap = 0.07,
fill_weight = 0.5,
na.rm = FALSE,
show.legend = NA,
inherit.aes = TRUE
)
geom_sketch_mark_ellipse(
mapping = NULL,
data = NULL,
stat = "identity",
position = "identity",
...,
expand = 0.05,
roughness = 1,
bowing = 1,
n_passes = 2L,
seed = NULL,
fill_style = "hachure",
hachure_angle = 45,
hachure_gap = 0.07,
fill_weight = 0.5,
na.rm = FALSE,
show.legend = NA,
inherit.aes = TRUE
)
geom_sketch_mark_rect(
mapping = NULL,
data = NULL,
stat = "identity",
position = "identity",
...,
expand = 0.05,
roughness = 1,
bowing = 1,
n_passes = 2L,
seed = NULL,
fill_style = "hachure",
hachure_angle = 45,
hachure_gap = 0.07,
fill_weight = 0.5,
na.rm = FALSE,
show.legend = NA,
inherit.aes = TRUE
)
A ggplot2 layer object.
Aesthetic mappings created by ggplot2::aes(). Requires x
and y; map group/colour/fill to separate the clusters.
Data to display.
Statistical transformation. Default "identity".
Position adjustment. Default "identity".
Other arguments passed on to the layer.
Fractional outward inflation of the mark, so it sits around the
points rather than through them. Default 0.05.
Non-negative roughness (0 = clean). Default 1.
Non-negative bowing multiplier. Default 1.
Number of stroke passes. Default 2.
Integer seed. NULL uses getOption("ggsketch.seed", 1L).
Fill style when fill is mapped: "hachure",
"cross_hatch", "zigzag", "scribble", "dots", "dashed", "stipple", "pencil_shade", or
"solid". Default "hachure".
Fill line angle in degrees. Default 45.
Fill line gap (npc fraction). Default 0.07.
Stroke weight for fill lines. Default 0.5.
Remove missing values silently? Default FALSE.
Logical; include in legend?
Override default aesthetics?
The boundary is computed in data units, so a geom_sketch_mark_circle() is a
true circle only under ggplot2::coord_equal() (as for
geom_sketch_circle()); on a non-square panel prefer
geom_sketch_mark_ellipse().
Other sketch-geoms:
GeomSketchAbline,
GeomSketchArrow,
GeomSketchBoxplot,
GeomSketchBracket,
GeomSketchCallout,
GeomSketchChicklet,
GeomSketchCol,
GeomSketchContourFilled,
GeomSketchCurve,
GeomSketchDotplot,
GeomSketchDumbbell,
GeomSketchEdge,
GeomSketchEllipse,
GeomSketchEngrave,
GeomSketchGantt,
GeomSketchHex,
GeomSketchLine,
GeomSketchLinerange,
GeomSketchLollipop,
GeomSketchMarkHull,
GeomSketchPath,
GeomSketchPoint,
GeomSketchPolygon,
GeomSketchRect,
GeomSketchRibbon,
GeomSketchRug,
GeomSketchSegment,
GeomSketchSfPolygon,
GeomSketchSlope,
GeomSketchSmooth,
GeomSketchSpoke,
GeomSketchTextRepel,
GeomSketchViolin,
StatSketchBeeswarm,
StatSketchCalendar,
StatSketchDensityRidges,
StatSketchFunnel,
StatSketchPie,
StatSketchPyramid,
StatSketchRadar,
StatSketchStream,
StatSketchTreemap,
StatSketchWaffle,
StatSketchWaterfall,
annotate_sketch(),
annotate_sketch_arrow(),
annotate_sketch_callout(),
annotate_sketch_highlight(),
geom_sketch_alluvial(),
geom_sketch_arc_diagram(),
geom_sketch_bin2d(),
geom_sketch_bump(),
geom_sketch_chord(),
geom_sketch_contour(),
geom_sketch_count(),
geom_sketch_dendrogram(),
geom_sketch_density(),
geom_sketch_density2d(),
geom_sketch_ecdf(),
geom_sketch_function(),
geom_sketch_histogram(),
geom_sketch_jitter(),
geom_sketch_marimekko(),
geom_sketch_mosaic(),
geom_sketch_parallel(),
geom_sketch_qq(),
geom_sketch_quantile(),
geom_sketch_rose(),
geom_sketch_sunburst(),
geom_sketch_text(),
sketch_graph()
library(ggplot2)
ggplot(iris, aes(Sepal.Length, Sepal.Width, colour = Species)) +
geom_sketch_mark_ellipse(aes(fill = Species), seed = 1L) +
geom_sketch_point(seed = 2L) +
theme_sketch()
Run the code above in your browser using DataLab