2015-05-15 23 views
17

Usunąłem etykiety na osi Y, ponieważ tylko względna ilość jest naprawdę ważna.Na wykresie bazowym R przesuń etykietę osi bliżej osi

w <- c(34170,24911,20323,14290,9605,7803,7113,6031,5140,4469) 
plot(1:length(w), w, type="b", xlab="Number of clusters", 
    ylab="Within-cluster variance", 
    main="K=5 eliminates most of the within-cluster variance", 
    cex.main=1.5, 
    cex.lab=1.2, 
    font.main=20, 
    yaxt='n',lab=c(length(w),5,7), # no ticks on y axis, all ticks on x 
    family="Calibri Light") 

cluster plot

Jednak tłumienia tych etykiet podziałki pozostawia dużo białej przestrzeni pomiędzy etykiety osi y („wariancji Wewnątrz klastra”) i osi y. Czy istnieje sposób, aby go z powrotem z powrotem? Jeśli w jakiś sposób ustawię (niewidoczne) etykiety zaznaczenia, aby uzyskać wewnątrz osi, czy oś etykiety osiada wzdłuż osi?

+3

Spróbuj pozostawiając 'ylab' z' plot' i umieszczenie go w 'axis' zamiast z niektórych opcji wprowadzanie. (Nie można przywołać opcji offhand.) To znaczy, 'spisek (...); axis (2, ...) ' –

Odpowiedz

27

Spróbuj ustawić ylab="" w swoim połączeniu plot i użyj title, aby ręcznie ustawić etykietę osi Y. Korzystanie line można dostosować położenie etykiety, np .:

plot(1:length(w), w, type="b", xlab="Number of clusters", ylab="", 
    main="K=5 eliminates most of the within-cluster variance", 
    cex.main=1.5, 
    cex.lab=1.2, 
    font.main=20, 
    yaxt='n',lab=c(length(w),5,7), # no ticks on y axis, all ticks on x 
    family="Calibri Light") 

title(ylab="Within-cluster variance", line=0, cex.lab=1.2, family="Calibri Light") 

enter image description here

Proszę przeczytać ?title więcej szczegółów.

+2

Ah man, właśnie miałem opublikować tę dokładną rzecz. Napisałem wszystko, ale próbowałem ustalić, dlaczego R w Windows nie pozwala mi zmienić czcionki. W każdym razie dobra robota. –

+0

@sgibb dziękuję bardzo za uczenie mnie, że 'title' może być użyty do etykiet (nie tylko do ustawienia' main'). Kończę, używając dwóch instrukcji 'title', jednego do przesunięcia' ylab' przez 'line = 1' i jednego, aby uzyskać' xlab' trochę bliżej 'line = 2.2'. Bardzo doceniane. – C8H10N4O2

17

Regulacja mgp patrz ?par

title(ylab="Within-cluster variance", mgp=c(1,1,0), family="Calibri Light",cex.lab=1.2) 

enter image description here

Powiązane problemy