Я смущен, чтобы задавать этот простой вопрос, но несколько дней думал о том, как создать сюжет:
plot (x = 1:10, y = rnorm (10, 5, 2))
grid (10,10, lty = 6, col = "cornsilk2")
Я хочу расположить решетки прямо там, где обозначена ось, т.е. на 2, 4, 6, 8, 10 по оси x и аналогично 3, 4, 5, 6, 7, 8 по оси y.
Я хочу автоматизировать процесс, как всякий раз, когда размер графика изменяет изменения поведения ярлыков по умолчанию. См. Следующий график:
Из ?grid описания аргументов nx и ny:
При NULL по умолчанию сетка выравнивается с отметками меток на соответствующей оси по умолчанию (т.е. меток, вычисленных с помощью axTicks)
plot (x = 1:10, y = rnorm (10, 5, 2))
grid (NULL,NULL, lty = 6, col = "cornsilk2")
Для справки существует способ управления параметрами сетки и осей непосредственно из команды plot(), если мы не определяем пользовательский интервал тика:
plot(x = 1:10, y = rnorm(10, 5, 2), xlim=c(1, 10), ylim=c(1, 10), panel.first=grid())
В документации plot.default() содержится больше информации об этих параметрах.
При использовании пользовательского интервала тиков наиболее простым является рисование сетки с помощью abline:
plot(x = 1:10, y = rnorm(10, 5, 2), xaxp=c(1, 10, 10), yaxp=c(1, 10, 10), axes=FALSE)
axis(1, 1:10)
axis(2, 1:10)
abline(h=1:10, v=1:10, col="gray", lty=3)
Подробнее о пользовательских интервалах тика в этой теме и здесь для выравнивания сетки.
Для потомков вот длинный способ сделать это вручную:
plot (x = 1:10, y = rnorm (10, 5, 2))
grid (lty = 6, col = "cornsilk2")
xaxp <- par("xaxp")
yaxp <- par("yaxp")
abline(v=seq(xaxp[1], xaxp[2], (xaxp[2]-xaxp[1])/xaxp[3]), lty=6, col = "cornsilk2")
abline(h=seq(yaxp[1], yaxp[2], (yaxp[2]-yaxp[1])/yaxp[3]), lty=6, col = "cornsilk2")
Ответ, представленный здесь, гораздо более прост, хотя вам может не нравиться отсутствие "свободного пространства" на каждом конце осей. Вкратце,
Проблема в том, что сетка помещает линии сетки nx в пользовательское пространство, но график добавляет дополнительное пространство на 4% с каждой стороны. Вы можете взять это под контроль. Добавление
xaxs="i", yaxs="i"к вашему сюжету отключит дополнительное пространство. Но тогда ваша верхняя правая точка будет обрезана, поэтому вам нужно изменить значения xlim и ylim и изменить nx для соответствия