geom_sketch_segment() draws roughened straight segments from (x, y) to
(xend, yend). geom_sketch_step() connects points with a hand-drawn
stairstep. Sketch analogues of ggplot2::geom_segment() /
ggplot2::geom_step().
GeomSketchSegmentgeom_sketch_segment(
mapping = NULL,
data = NULL,
stat = "identity",
position = "identity",
...,
roughness = NULL,
bowing = 1,
n_passes = 2L,
seed = NULL,
medium = NULL,
na.rm = FALSE,
show.legend = NA,
inherit.aes = TRUE
)
GeomSketchStep
geom_sketch_step(
mapping = NULL,
data = NULL,
stat = "identity",
position = "identity",
...,
direction = "hv",
roughness = 1,
bowing = 1,
n_passes = 2L,
seed = NULL,
medium = NULL,
na.rm = FALSE,
show.legend = NA,
inherit.aes = TRUE
)
A ggplot2 layer object.
Set of aesthetic mappings created by ggplot2::aes().
Data to display.
Statistical transformation. Default "identity".
Position adjustment. Default "identity".
Other arguments passed on to the layer.
Non-negative roughness (0 = straight). Default 1. For
geom_sketch_segment() this is a mappable aesthetic (map it per segment
with aes(roughness = ), rescaled by scale_roughness_continuous()); for
geom_sketch_step() it is a layer parameter (one path per group).
Non-negative bowing multiplier. Default 1.
Number of stroke passes. Default 2.
Integer seed. NULL uses getOption("ggsketch.seed", 1L).
Drawing medium for the stroke: one of sketch_media(). The
default "pen" is the classic constant-width double stroke; the others
("ink", "brush", "pencil", "chalk", "marker", "highlighter",
"crayon")
render through the variable-width stroke_ribbon() engine.
Remove missing values silently? Default FALSE.
Logical; include in legend?
Override default aesthetics?
For geom_sketch_step(): "hv" (horizontal then vertical,
default) or "vh".
Other sketch-geoms:
GeomSketchAbline,
GeomSketchArrow,
GeomSketchBoxplot,
GeomSketchBracket,
GeomSketchCallout,
GeomSketchChicklet,
GeomSketchCol,
GeomSketchContourFilled,
GeomSketchCurve,
GeomSketchDotplot,
GeomSketchDumbbell,
GeomSketchEdge,
GeomSketchEllipse,
GeomSketchEngrave,
GeomSketchGantt,
GeomSketchHex,
GeomSketchLine,
GeomSketchLinerange,
GeomSketchLollipop,
GeomSketchMarkCircle,
GeomSketchMarkHull,
GeomSketchPath,
GeomSketchPoint,
GeomSketchPolygon,
GeomSketchRect,
GeomSketchRibbon,
GeomSketchRug,
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)
df <- data.frame(x = 1:3, y = 1:3, xend = 2:4, yend = c(3, 1, 4))
ggplot(df) +
geom_sketch_segment(aes(x = x, y = y, xend = xend, yend = yend),
seed = 1L) +
theme_sketch()
Run the code above in your browser using DataLab