# Rpad Base Page

Rpad/HTML pages (click on the link to load the file):

New Rpad page

    .threecolumns = function(lst) {
        n = length(lst)
        if (n <= 3) return(as.matrix(lst))
        ncol = 3
        nrow = ceiling(n / ncol)
        lst = as.matrix(append(lst, rep("", ncol * nrow - n)))
        dim(lst) = c(nrow, ncol)
        lst
    }
    .rpadfiles = grep('\\.html$|\\.rpad$', dir(), ignore.case = TRUE, value = TRUE)
    .rpadfiles = H("a", href = .rpadfiles, collapseContents = FALSE,
                   .rpadfiles)
    .rpadfiles = .threecolumns(.rpadfiles)
    HTMLon()
    Html(.rpadfiles)

*.Rdata R binary files (click to load into R):

    .files = grep('\\.RData$', dir(), ignore.case = TRUE, value = TRUE)
    .files = H("a", href = paste('javascript:rpad.send("R", "load(\\\\"',
                                 .files,
                                 '\\\\")")', sep = ""),
               collapseContents = FALSE,
               .files)
    .files = .threecolumns(.files)
    HTMLon()
    Html(.files)

*.R files (click to source into R):

    .files = grep('\\.R$', dir(), ignore.case = TRUE, value = TRUE)
    .files = H("a", href = paste('javascript:rpad.send("R", "source(\\\\"',
                                 .files,
                                 '\\\\")")', sep = ""),
               collapseContents = FALSE,
               .files)
    .files = .threecolumns(.files)
    HTMLon()
    Html(.files)

R objects:

    # print(ls.str(), wid = 40, nchar.max = 20, vec.len=2)
    ls()

Help

R function/object search
R/Rpad quick reference
R documentation
Rpad documentation
Rpad helper functions
Rpad homepage
R homepage

Rpad demos

General Example
Data input
GUI Examples

by Tom Short, tshort@epri.com, Copyright 2005. EPRI, license: GNU GPL v2 or greater