[R] Inserting a jpeg into an existing widget

[Daniel Zamykal]

Does anyone know how to insert a jpeg image into a widget.

This is a portion of the code I have used to create the widget. I would like 
to insert an image in the bottom corner.

Cheers

tt<-tktoplevel()
fontHeading2 <- tkfont.create(family="arial",size=16, slant="italic")
fontHeading3 <- tkfont.create(family="arial",size=12)
fontTextLabel <- tkfont.create(family="arial",size=12)
fontlabel <- tkfont.create(family="arial",size=10,weight="bold")
tkgrid(tklabel(tt,height=2,width=50, text=""))
tkgrid(tklabel(tt,text=""))
tkgrid(tklabel(tt,text="'Enhance Your Decision Making'", font=fontHeading2, 
foreground="black"))
tkgrid(tklabel(tt,text=" v 4.0", font=fontTextLabel))
tkgrid(tklabel(tt,height=2,width=50,text=""))
tkgrid(tklabel(tt,text=""))