Belle etichette degli assi per la scala di registro in ggplot

Question

Quando provo una delle seguenti opzioni, la scala dell'asse è 1e + 03, 1e + 06, 1e + 09 - è possibile ottenere belle apice 10^3, 10^6, 10^9 invece di ricorrere all'etichettatura manuale? Mi sembra di ricordare di averlo fatto automaticamente in passato.

qplot(1:10, 10^(1:10))+scale_y_log10() 
qplot(1:10, 10^(1:10), log='y') 

Answer 1

È possibile utilizzare trans_breaks() e trans_format() dalla libreria scales per ottenere la formattazione desiderata dei valori degli assi.

library(scales) 
qplot(1:10, 10^(1:10)) + 
    scale_y_log10(breaks = trans_breaks("log10", function(x) 10^x), 
       labels = trans_format("log10", math_format(10^.x)))