```
# NOT RUN {
fic = HTMLInitFile()
HTML.title("sample page",1,file=fic)
HTML("First paragraph",file=fic)
cat("Some text and then an equation:",file=fic,append=TRUE)
HTML(as.latex("\int_{-\infty}^{1}f(x)dx") ,file=fic)
cat(". Nice isn't it?",file=fic,append=TRUE)
HTML(as.latex("\int_{-\infty}^{1}f(x)dx",inline=FALSE) ,file=fic)
HTML(as.latex("\int_{-\infty}^{1}f(x)dx",inline=FALSE,count=TRUE) ,file=fic)
HTML(as.latex("\int_{-\infty}^{1}f(x)dx",inline=FALSE,label="My equation") ,file=fic)
cat("file:", fic, "is created")
browseURL(fic)
# }
```

Run the code above in your browser using DataLab