Удалить значения оси графика


153

Мне просто интересно, есть ли способ избавиться от значений осей, соответственно оси x или оси y, на графике r-сюжета.

Я знаю, что axes = falseизбавлюсь от всей оси, но хотелось бы только избавиться от нумерации.

Ответы:


195

Удалить нумерацию по оси X или Y:

plot(1:10, xaxt='n')
plot(1:10, yaxt='n')

Если вы также хотите удалить ярлыки:

plot(1:10, xaxt='n', ann=FALSE)
plot(1:10, yaxt='n', ann=FALSE)

3
но имейте в виду, что они удаляют всю ось ... там ничего не будет, если вы не используете настройку bty, которая помещает линии туда, где находятся ваши оси. По умолчанию используется bty = 'o', поэтому обычно вокруг графика будет рамка, в которой будут находиться оси. Но с bty = 'n' будут просто точки, плавающие в пространстве.
Джон

66

Используя базовую графику, стандартный способ сделать это - использовать оси = ЛОЖЬ, а затем создать свои собственные оси, используя Ось (или ось). Например,

x <- 1:20
y <- runif(20)
plot(x, y, axes=FALSE, frame.plot=TRUE)
Axis(side=1, labels=FALSE)
Axis(side=2, labels=FALSE)

Решеточный эквивалент

library(lattice)
xyplot(y ~ x, scales=list(alternating=0))

Плюс один для объяснения решетки!
Жубарб

19

У @Richie Cotton довольно хороший ответ выше. Могу только добавить, что на этой странице приведены некоторые примеры. Попробуйте следующее:

x <- 1:20
y <- runif(20)
plot(x,y,xaxt = "n")
axis(side = 1, at = x, labels = FALSE, tck = -0.01)

10

Вы также можете разместить метки внутри графика:

plot(spline(sub$day, sub$counts), type ='l', labels = FALSE)

вы получите предупреждение. Я думаю, это потому, что метки - это на самом деле параметр, который передается подпрограмме, выполняемой графиком (оси?). появится предупреждение, потому что оно не было напрямую параметром функции plot.


1

Измените axis_colour, чтобы он соответствовал фону, и если вы изменяете фон динамически, вам нужно будет одновременно обновить axis_colour. * На общей картинке показан пример графика / графика с использованием фиктивных данных ()

### Main Plotting Function ###
plotXY <- function(time, value){

    ### Plot Style Settings ###

    ### default bg is white, set it the same as the axis-colour 
    background <- "white"

    ### default col.axis is black, set it the same as the background to match
    axis_colour <- "white"

    plot_title <- "Graph it!"
    xlabel <- "Time"
    ylabel <- "Value"
    label_colour <- "black"
    label_scale <- 2
    axis_scale <- 2
    symbol_scale <- 2
    title_scale <- 2
    subtitle_scale <- 2
    # point style 16 is a black dot
    point <- 16 
    # p - points, l - line, b - both
    plot_type <- "b"

    plot(time, value, main=plot_title, cex=symbol_scale, cex.lab=label_scale, cex.axis=axis_scale, cex.main=title_scale, cex.sub=subtitle_scale, xlab=xlabel, ylab=ylabel, col.lab=label_colour, col.axis=axis_colour, bg=background, pch=point, type=plot_type)
}

plotXY(time, value)

введите описание изображения здесь

Используя наш сайт, вы подтверждаете, что прочитали и поняли нашу Политику в отношении файлов cookie и Политику конфиденциальности.
Licensed under cc by-sa 3.0 with attribution required.