Подавить галочки на графике в r

Я хочу удалить метки и ось с оси X, добавив новые галочки.

plot(1:10, ylab = "")
at1 <- seq(1, 10, 0.1)
axis(side = 1, at = at1, labels = FALSE)

Я не мог избавиться от ярлыков y.