27 lines
1 KiB
Typst
27 lines
1 KiB
Typst
#import "@preview/cetz:0.2.2": canvas, plot, draw
|
|
|
|
#let line_style = (stroke: (paint: black, thickness: 2pt))
|
|
#let dashed = (stroke: (dash: "dashed"))
|
|
#let fill_aqua = (stroke: none, fill: teal)
|
|
#let fill_olive = (stroke: none, fill: maroon)
|
|
#canvas({
|
|
plot.plot(size: (7,3),
|
|
legend: "legend.south",
|
|
legend-style: (orientation: ltr, item: (spacing: 0.5)),
|
|
x-tick-step: none,
|
|
x-ticks: ((-1.25, [-a]), (1.25, [a]), (0, [0])),
|
|
y-label: $cal(R)(1, 2, x)$,
|
|
x-label: $x$,
|
|
y-tick-step: none,
|
|
y-ticks: ((0, [0]), (1, [1])),
|
|
axis-style: "left",
|
|
x-min: -3,
|
|
x-max: 3,
|
|
y-min: 0,
|
|
y-max: 1,{
|
|
plot.add(((-3,0), (-2.125,0), (-2.125,1), (0.375,1), (0.375, 0), (3, 0)), line: "vh", style: line_style)
|
|
plot.add(((-1.8, 0), (-1.1, 0)), mark: "|", mark-size: .4, mark-style: (stroke: (thickness: 2pt, paint: blue)), style: (stroke: (paint: blue, thickness: 2pt)))
|
|
plot.add(((-1.45, 0), (-1.45, 0)), mark: "o", mark-style: (stroke: (paint: red), fill: red))
|
|
plot.add-hline(1, style: dashed)
|
|
})
|
|
})
|