format                 package:base                 R Documentation

_E_n_c_o_d_e _i_n _a _C_o_m_m_o_n _F_o_r_m_a_t

_D_e_s_c_r_i_p_t_i_o_n:

     Format an R object for pretty printing.

_U_s_a_g_e:

     format(x, ...)

     ## Default S3 method:
     format(x, trim = FALSE, digits = NULL,
            nsmall = 0, justify = c("left", "right", "centre", "none"),
            width = NULL, na.encode = TRUE, scientific = NA,
            big.mark = "",   big.interval = 3,
          small.mark = "", small.interval = 5,
        decimal.mark = ".", ...)

     ## S3 method for class 'data.frame':
     format(x, ..., justify = "none")

     ## S3 method for class 'factor':
     format(x, ...)

     ## S3 method for class 'AsIs':
     format(x, width = 12, ...)

_A_r_g_u_m_e_n_t_s:

       x: any R object (conceptually); typically numeric.

    trim: logical; if 'FALSE', logical, numeric and complex values are
          right-justified to a common width: if 'TRUE' the leading
          blanks for justification are suppressed.

  digits: how many significant digits are to be used for numeric and
          complex 'x'.  The default, 'NULL', uses 'getOption(digits)'. 
          This is a suggestion: enough decimal places will be used so
          that the smallest (in magnitude) number has this many
          significant digits, and also to satisfy 'nsmall'. (For the
          intepretation for complex numbers see 'signif'.)

  nsmall: number of digits which will always appear to the right of the
          decimal point in formatting real/complex numbers in
          non-scientific formats.  Allowed values are '0 <= nsmall <=
          20'.

 justify: should a _character_ vector be left-justified (the default),
          right-justified, centred or left alone.

   width: 'default' method: the _minimum_ field width or 'NULL' or '0'
          for no restriction.

          'AsIs' method: the _maximum_ field width for non-character
          objects.  'NULL' corresponds to the default 12. 

na.encode: logical: should 'NA' strings be encoded?

scientific: Either a logical specifiying whether  elements of a real or
          complex vector should be encoded in scientific format, or an
          integer penalty (see 'options("scipen")'. Missing values
          correspond to the current default penalty.

     ...: further arguments passed to or from other methods.

big.mark, big.interval,
small.mark, small.interval,
decimal.mark: used
          for prettying longer decimal sequences, passed to
          'prettyNum': that help page explains the details.

_D_e_t_a_i_l_s:

     'format' is a generic function.  Apart from the methods described
     here there are methods for dates (see 'format.Date'), date-times
     (see 'format.POSIXct')) and for other classes such as
     'format.octmode' and 'format.dist'.

     'format.data.frame' formats the data frame column by column,
     applying the appropriate method of 'format' for each column.
     Methods for columns are often similar to 'as.character' but offer
     more control.  Matrix and data-frame columns will be converted to
     separate columns in the result, and character columns (normally
     all) will be given class '"AsIs"'.

     'format.factor' converts the factor to a character vector and then
     calls the default method (and so 'justify' applies).

     'format.AsIs' deals with columns of complicated objects that have
     been extracted from a data frame.  Character objects are passed to
     the default method (and so 'width' does not apply). Otherwise it
     calls 'toString' to convert the object to character (if a vector
     or list, element by element) and then right-justifies the result.

     Justification for character vectors (and objects converted to
     character vectors by their methods) is done on display width (see
     'nchar'), taking double-width characters and the rendering of
     special characters (as escape sequences, including escaping
     backslash: see 'print.default') into account.  Character strings
     are padded with blanks to the display width of the widest. (If
     'na.encode = FALSE' missing character strings are not included in
     the width computations and are not encoded.)

     Numeric vectors are encoded with the minimum number of decimal
     places needed to display all the elements to at least the 'digit'
     significant digits.  However, if all the elements then have
     trailing zeroes, the number of decimal places is reduced until at
     least one element has a non-zero final digit.

     Raw vectors are converted to their 2-digit hexadecimal
     representation by 'as.character'.

_V_a_l_u_e:

     An object of similar structure to 'x' containing character
     representations of the elements of the first argument 'x' in a
     common format.

     For numeric or complex 'x', dims and dimnames are preserved on
     matrices/arrays and names on vectors: as from R 2.2.0 no other
     attributes are copied.

     If 'x' is a list, the result is a character vector obtained by
     applying 'format.default(x, ...)' to each element of the list
     (after 'unlist'ing elements which are themselves lists), and then
     collapsing the result for each element with 'paste(collapse = ",
     ")'.  The defaults in this case are 'trim = TRUE, justify =
     "none"' since one does not usually want alignment in the collapsed
     strings.

_R_e_f_e_r_e_n_c_e_s:

     Becker, R. A., Chambers, J. M. and Wilks, A. R. (1988) _The New S
     Language_. Wadsworth & Brooks/Cole.

_S_e_e _A_l_s_o:

     'format.info' indicates how an atomic vector would be formatted.

     'formatC', 'paste', 'as.character', 'sprintf', 'print',
     'toString', 'encodeString'.

_E_x_a_m_p_l_e_s:

     format(1:10)
     format(1:10, trim = TRUE)

     zz <- data.frame("(row names)"= c("aaaaa", "b"), check.names=FALSE)
     format(zz)
     format(zz, justify = "left")

     ## use of nsmall
     format(13.7)
     format(13.7, nsmall = 3)
     format(c(6.0, 13.1), digits = 2)
     format(c(6.0, 13.1), digits = 2, nsmall = 1)

     ## use of scientific
     format(2^31-1)
     format(2^31-1, sci = TRUE)

     ## a list
     z <- list(a=letters[1:3], b=(-pi+0i)^((-2:2)/2), c=c(1,10,100,1000),
               d=c("a", "longer", "character", "string"))
     format(z, digits = 2)
     format(z, digits = 2, justify = "left", trim = FALSE)

