Skip to content
Prev 299283 / 398503 Next

i need help in documentation

On 07/05/2012 10:37 PM, purushothaman wrote:
Hi B.Purushothaman,
Does this do what you want?

instream<-file("sample.R","r")
sample.txt<-readLines(instream)
close(instream)
library(prettyR)
delim.table(
  as.matrix(sample.txt[grep("##",sample.txt,fixed=TRUE)]),
  html=TRUE,label="Doc for sample.R")

<html><body>

Doc for sample.R</tr>
<table border=1>
</tr>
<tr><td>        ##title<< read csv file</tr>
<tr><td>        ##author<< Purushoth</tr>
<tr><td>        ##description this function is used to read a csv file</tr>
</table>

Jim