sfsmisc (version 0.95-1)

pretty10exp: Nice 10 ** k Label Expressions

Description

Produce nice $a \times 10^k$ expressions to be used instead of the scientific notation "a E".

Usage

pretty10exp(x, drop.1 = FALSE)

Arguments

x

numeric vector (e.g. axis tick locations)

drop.1

logical indicating if $1 \times$ should be dropped from the resulting expressions.

Value

• an expression of the same length as x, with elements of the form a %*% 10 ^ k.

See Also

axTexpr which builds on pretty10exp(); further axis, axTicks.

Examples

pretty10exp(-1:3 * 1000)
pretty10exp(-1:3 * 1000, drop.1 = TRUE)
pretty10exp(c(1,2,5,10,20,50,100,200) * 1e3)
stopifnot(identical(pretty10exp(numeric(0)), expression()))