Draws line segments from (x, y) at a given angle (radians) and radius -
the sketch analogue of ggplot2::geom_spoke(). Handy for vector / flow
fields. Internally reuses GeomSketchSegment.
GeomSketchSpokegeom_sketch_spoke(
mapping = NULL,
data = NULL,
stat = "identity",
position = "identity",
...,
radius = 1,
angle = 0,
roughness = NULL,
bowing = 1,
n_passes = 2L,
seed = 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.
Optional fixed radius / angle (radians) used when not
supplied as aesthetics.
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).
Remove missing values silently? Default FALSE.
Logical; include in legend?
Override default aesthetics?
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,
GeomSketchSegment,
GeomSketchSfPolygon,
GeomSketchSlope,
GeomSketchSmooth,
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 <- expand.grid(x = 1:5, y = 1:5)
df$angle <- runif(nrow(df), 0, 2 * pi)
df$radius <- 0.5
ggplot(df, aes(x, y)) +
geom_sketch_spoke(aes(angle = angle, radius = radius), seed = 1L) +
geom_sketch_point(seed = 2L) +
theme_sketch()
Run the code above in your browser using DataLab