Pad Values with Leading Zeroes

Share:

Description

Pad numbers and/or text with leading and/or trailing zeroes.

Usage

1
pad0(x, n, f = 0)

Arguments

x

vector of numbers and/or strings

n

number of text characters representing a padded integer

f

factor of 10 transformation on x before padding

Details

Converts numbers (or text coerced to numeric) to integers and then to text, and pads them with leading zeroes. If the factor f is >0, then trailing zeroes are also added.

Value

If length(f)==1 or length(x)==1, the function returns a character vector representing x with leading zeroes.

If both f and x have lengths >1, then a list of character vectors indexed by f is returned.

Author(s)

Rowan Haigh, Pacific Biological Station, Fisheries and Oceans Canada, Nanaimo BC

See Also

show0, GT0

Examples

1
2
3
4
local(envir=.PBSmodEnv,expr={
  resetGraph(); x <- pad0(x=123,n=10,f=0:7);
  addLabel(.5,.5,paste(x,collapse="\n"),cex=1.5);
})

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker.