customizeSparkTable: Customize a sparkTable within a shiny App

In alexkowa/sparkTable: Sparklines and Graphical Tables for TeX and HTML

Description

Interactive modification of an sparkTable-class

Usage

  customizeSparkTable(object, outputDir=getwd())

Arguments

object	an object of class sparkTable-class
outputDir	a path to a directory for the output (Default=current working directory)

See Also

export

Examples

## Not run: 
data(pop,package="sparkTable")
b <- newSparkBox()
l <- newSparkLine()
bb <- newSparkBar()
content <- list(
  function(x) { round(mean(x),2) },
  b,
  l,
  bb,
  function(x) { round(tail(x,1),2) }
)
names(content) <- paste("column",1:length(content),sep="")
varType <- rep("value",length(content))
pop <- pop[,c("variable","value","time")]
pop$time <- as.numeric(as.character(pop$time))
xx <- reshapeExt(pop, varying=list(2))
x1 <- newSparkTable(xx, content, varType)
x1@dataObj$v1 <- rpois(nrow(xx),1)
x1@dataObj$v2 <- rpois(nrow(xx),2)
x1@dataObj$v3 <- rpois(nrow(xx),3)

customizeSparkTable(x1, outputDir=getwd())

## End(Not run)

alexkowa/sparkTable documentation built on May 12, 2019, 12:29 a.m.