Compare commits

..

4 commits

Author SHA1 Message Date
Simon
ba8aff77a4 Refine battleship column spacing
All checks were successful
Build and deploy the book / book (push) Successful in 5s
Build and deploy the book / book (pull_request) Successful in 5s
2026-08-20 20:21:18 +01:00
Simon
406eab8fd7 better white fillings 2026-08-20 20:15:28 +01:00
Simon
77cead08b4 Refine pottery seriation figure 2026-08-20 11:21:41 +01:00
59746b6076 Merge pull request 'Chapter 6 figure refinements' (#1) from chapter-update into main
All checks were successful
Build and deploy the book / book (push) Successful in 6s
Reviewed-on: #1
2026-08-20 10:07:14 +00:00

View file

@ -62,7 +62,7 @@ n_phase <- nrow(dt)
phase_axis <- seq_len(n_phase)
phase_labels <- rownames(dt)
series_center <- seq_len(series_col)
max_ship_width <- 5
max_ship_width <- 3.5
ship_widths <- as.matrix(dt) / max(dt[, "Corrugated"]) * max_ship_width
plot_left <- series_center[3] - max_ship_width / 2
plot_right <- series_center[3] + max_ship_width / 2
@ -102,7 +102,7 @@ text(
cex = 0.9
)
text(
plot_left,
0,
n_phase - phase_axis + 1,
labels = phase_labels,
pos = 2,