Używając grafiki podstawowej w języku R, jak mogę dodać indeksy górne do etykiet osi? tak jak można to robić podczas rysowania osi szerokości i długości geograficznej na mapie.
przykład:
plot(-100:-50, 50:100, type="n", xlab="", ylab="", axes=FALSE)
axis(1, seq(-100, -50, 10), labels=paste(abs(seq(-100, -50, 10)), "o", "W", sep=""))
axis(2, seq(50, 100, 10), labels=paste(seq(50,100,10), "o", "N", sep=""))
box()
Tworzy to ładną ramkę wokół mapy. Jeszcze fajniej byłoby dodać indeks górnego symbolu stopnia.
Zwykle można tego dokonać w innych funkcjach drukowania, takich jakmtext ()i text (), używając wyrażenia expression(paste(...)) albo substitute(), ale jak to zrobić w tym przypadku?
0
1 odpowiedź
Działa to w ten sam sposób dla osi: parse(text='70^°*N') podniesie ° jako indeks górny:
labelsX=parse(text=paste(abs(seq(-100, -50, 10)), "^° ", "*W", sep=""))
labelsY=parse(text=paste(seq(50,100,10), "^° ", "*N", sep=""))
plot(-100:-50, 50:100, type="n", xlab="", ylab="", axes=FALSE)
axis(1, seq(-100, -50, 10), labels=labelsX)
axis(2, seq(50, 100, 10), labels=labelsY)
box()
0