Увеличьте длину подписанных тиков

Question

как я могу делать более крупные тики, что происходит с ярлыками? Существует некоторый код для черчения:

r <- as.POSIXct(round(range(time), "mins")) 
plot(time,x,t="l", xaxt = "n") 
... 
axis.POSIXct(1, at = seq(r[1], r[2], by = "min"), format = "%H:%M:%S") 

Чтобы получить этот участок:

Как вы можете видеть, все клещи имеют одинаковый размер. Есть ли способ автоматически увеличить длину этих тиков, которые подписаны?

Answer 1

При создании очень специфического расположения оси вам обычно нужно добавить ось после рисования графика. Поскольку у вас не было воспроизводимого примера, я создал свой собственный набор данных.

1. Создать сюжет, но не показывать оси

   plot(1:10, axes=FALSE, frame=TRUE) 
   

2. Добавить в х-масштабе. В этом примере значения 1,2,3, ...., 10. Аргумент tck определяет длину клеща:

   ##The tck value should be smaller here 
   axis(1, 1:10, tck=-0.05) 
   

3. Теперь добавьте в дополнительной шкале для «промежуточных» значений. Я настроил labels="", поэтому мы не печатаем любые значения:

   axis(1, seq(0.5, 9.5, 1), labels=rep("", 10), tck=-0.01) 
   

Это дает: