data(pop)
metaObj <- sparkTable_Config(
df=pop,
groups=as.character(unique(pop[,2])),
groupVar="variable",
vars=c("value"),
typeNumeric=list(c("min", "max")),
typePlot=c("line"),
output="eps")
# set top_padding and bottom_padding for all graphics to zero
metaObj$metaData <- setPara(metaObj$metaData, "top_padding", 0)
metaObj$metaData <- setPara(metaObj$metaData, "bottom_padding", 0)
# do something with metaObj, print for example.
Run the code above in your browser using DataLab