Skip to content

R2HTML how to pair graphic.png and table

4 messages · Eric Lecoutre, Domenico Vistocco, Roberto Iacopetti

#
Dear list,
i have this problem:
how to pair a graphic.png and a table in R2HTML ?

The better showing of a mutiple analysis is sometimes to mate graphic and
table

Can anyone help me in this task ??

In the example below graphisc and table are subsequent and not pair..
 

directory=getwd()
myfile<-file.path(directory,"testHTML.html")    
HTMLoutput=file.path(directory,"testHTML.html")
graf="graf.png"
png(file.path(directory,graf))
plot(c(1:12))
dev.off()
tab<-as.matrix(c(1:12))
HTMLInsertGraph(graf,tab,file=HTMLoutput,caption="Esempio di grafico")
browseURL(myfile)

Thanks in advance

Roberto Iacopetti
#
You could use a table with one row and two columns:

HTML("<TABLE><TD>",file=HTMLoutput)
HTML(tab,file=HTMLoutput)
HTML("</TD><TD>",file=HTMLoutput)
HTMLInsertGraph(graf,file=HTMLoutput,caption="Esempio di grafico")
HTML("</TD></TABLE>",file=HTMLoutput)

domenico

PS:
You could create a function if this is a common operation:

tableGraph=function(tab2Html,graph2Html,fileHtml){
    HTML("<TABLE><TD>",file=fileHtml)
    HTML(tab2Html,file=HTMLoutput)
    HTML("</TD><TD>",file=HTMLoutput)
    HTMLInsertGraph(graph2Html,file=fileHtml,caption="Esempio di grafico")
    HTML("</TD></TABLE>",file=fileHtml)
}

and then:
tableGraph(tab,graf,HTMLoutput)
Roberto Iacopetti wrote:
#
Eric,

your code work well for my need,
i'm not skillful in html environment, but your functions in R2HTML give
simple many
output requirements

thanks

Roberto
Eric Lecoutre wrote: