Notação Científica no R

É menos intuitiva que nos outros programas de gráficos (gnuplot, xmgrace), porém é possível fazer também. Primeiro crie a função que irá retornar a lista de expressões que você usará no atributo labels da função axis que cria os eixos:

flabs <- function(l) {
        # definimos o comprimento da lista de entrada l
	n <- length(l)
        # criamos um vetor de expressões vazio
	labs <- vector("expression",n)
        # um loop para preencher a lista com seus devidos valores, a função substitute retorna um objeto que contém a expressão no índice 2
	for(i in 1:n) {
		labs[i] <- substitute(expression(10^x),list(x = l[i]))[2]
	}
	return(labs)
}

Agora é só fazer um gráfico sem eixos, e logo em seguida construir os eixos com a função axis:

plot(x,y,axes=FALSE,frame.plot = TRUE)
# no eixo x
axis(1,at=axTicks(1),labels=flabs(log10(axTicks(1))))
# no eixo y
axis(2,at=axTicks(2),labels=flabs(log10(axTicks(2))))

isso funciona apenas para eixos proporcionais a . Mas caso necessite de algo como acrescente o número ao construir a expressão em flabs.

Conclusão. formatar eixos no R é bem artesanal.

O resultado dessa peleja é o gráfico inserido abaixo.

cumdistmod.pdf

Linkbacks

Use the following URL for manually sending trackbacks: http://complex.if.uff.br/lib/plugins/linkback/exe/trackback.php/orahcio:home:notacao-cientifica-no-r

Discussão

Enter your comment
PMFML
 
orahcio/home/notacao-cientifica-no-r.txt · Última modificação: 2011/08/25 12:57 por orahcio
CC Attribution-Share Alike 3.0 Unported
www.chimeric.de Valid CSS Driven by DokuWiki do yourself a favour and use a real browser - get firefox!! Recent changes RSS feed Valid XHTML 1.0