метки оси вращения в R


Ответы:


178

Не уверен, что это то, что вы имеете в виду, но попробуйте установить las=1. Вот пример:

require(grDevices)
tN <- table(Ni <- stats::rpois(100, lambda=5))
r <- barplot(tN, col=rainbow(20), las=1)

вывод

Это представляет стиль меток оси. (0 = параллельно, 1 = все по горизонтали, 2 = все перпендикулярно оси, 3 = все по вертикали)


6
это работает, но это обрезает этикетки. Поэтому могут потребоваться дополнительные опции.
boczniak767

Есть ли простой способ повернуть метки оси? Например, если в качестве меток оси используются большие числа, было бы неплохо повернуть их на 45 градусов, чтобы обеспечить хороший баланс между удобочитаемостью (по горизонтали) и эффективностью пространства (по вертикали).
JMB

85

Использование par(las=1).

Смотрите ?par:

las
numeric in {0,1,2,3}; the style of axis labels.
0: always parallel to the axis [default],
1: always horizontal,
2: always perpendicular to the axis,
3: always vertical.

Есть ли способ установить его так, чтобы только метки оси x были перпендикулярны оси?
Андрей

18
Стиль Te может быть установлен для каждой оси отдельно, напримерplot(1, xaxt="n", yaxt="n"); axis(1, las=2); axis(2, las=1)
rcs

4
всегда делайте резервную копию перед тем, как делать какие-либо изменения: old.par <- par (no.readonly = T) :-)
HongboZhu

19

Как отметил Мачей Йончик , вам также может понадобиться увеличить поля

par(las=2)
par(mar=c(8,8,1,1)) # adjust as needed
plot(...)

12

Вам нужно использовать функцию theme () следующим образом, поворачивая метки оси X на 90 градусов:

ggplot(...)+...+ theme(axis.text.x = element_text(angle=90, hjust=1))

должно быть 90 градусов
C8H10N4O2

1

Сначала создайте данные для диаграммы

H <- c(1.964138757, 1.729143013,    1.713273714,    1.706771799,    1.67977205)
M <- c("SP105", "SP30", "SP244", "SP31",    "SP147")

Во-вторых, дайте имя для файла диаграммы

png(file = "Bargraph.jpeg", width = 500, height = 300)

В-третьих, постройте гистограмму

barplot(H,names.arg=M,ylab="Degree ", col= rainbow(5), las=2, border = 0, cex.lab=1, cex.axis=1, font=1,col.axis="black")
title(xlab="Service Providers", line=4, cex.lab=1)

Наконец, сохраните файл

dev.off()

Вывод:

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

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