#"Hello World!" - text on legend
#Initialize the gnuplot handle
h1<-Gpinit()
## Not run:
# #set output to a postscript file
# #Gpcmd(h1,'set terminal postscript eps color;set output "helloworld1.eps"')
# #label the x and y axis
# GpsetXlabel(h1, 'x')
# GpsetYlabel(h1, 'y')
# #set plot style to "lines"
# Gpsetstyle(h1, 'lines')
# #plot and add a legend
# GpplotEquation(h1,'sin(x)','Hello World!')
# #pause R and gnuplot
# Gppause()## End(Not run)
#close gnuplot handle
h1<-Gpclose(h1)
Run the code above in your browser using DataLab