label sumbu putar di R


Jawaban:


178

Tidak yakin apakah ini yang Anda maksud, tetapi coba atur las=1. Ini sebuah contoh:

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

keluaran

Itu mewakili gaya label sumbu. (0 = paralel, 1 = semua horisontal, 2 = semua tegak lurus terhadap sumbu, 3 = semua vertikal)


6
ini bekerja, tetapi memangkas label. Jadi opsi tambahan mungkin diperlukan.
boczniak767

Apakah ada cara mudah untuk memutar label kutu sumbu? Misalnya jika saya memiliki angka yang lebih besar sebagai label centang sumbu, itu bagus untuk membuatnya diputar sekitar 45 derajat untuk mencapai keseimbangan yang baik antara keterbacaan (horisontal) dan efisiensi ruang (vertikal).
jmb

85

Menggunakan par(las=1) .

Lihat ?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.

Apakah ada cara untuk mengaturnya sehingga hanya label sumbu x yang tegak lurus terhadap sumbu?
andrewj

18
Gaya dapat diatur untuk setiap sumbu secara terpisah, misalnyaplot(1, xaxt="n", yaxt="n"); axis(1, las=2); axis(2, las=1)
rcs

4
selalu cadangkan sebelum melakukan perubahan seperti itu: old.par <- par (no.readonly = T) :-)
HongboZhu

19

Seperti Maciej Jończyk sebutkan, Anda mungkin juga perlu meningkatkan margin

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

12

Anda perlu menggunakan fungsi theme () sebagai berikut untuk memutar label sumbu-x sebanyak 90 derajat:

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

harus 90 derajat
C8H10N4O2

1

Pertama, buat data untuk bagan

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

Kedua, berikan nama untuk file grafik

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

Ketiga, Plot diagram batang

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)

Akhirnya, simpan file tersebut

dev.off()

Keluaran:

masukkan deskripsi gambar di sini

Dengan menggunakan situs kami, Anda mengakui telah membaca dan memahami Kebijakan Cookie dan Kebijakan Privasi kami.
Licensed under cc by-sa 3.0 with attribution required.