Mai -

sql=c("-- This is a comment line",
+          "select sysdate  -- This is a comment Text" ,
+          " from dual ")
use = sub('--.*$','',sql)
use[use != '']
[1] "select sysdate  " " from dual "

Although to get it to print the way you listed, you need
to reduce the width of the line:

options(width=20)
use[use != '']
[1] "select sysdate  "
[2] " from dual "

                                        - Phil Spector
                                         Statistical Computing Facility
                                         Department of Statistics
                                         UC Berkeley
                                         [email protected]


On Tue, 22 Feb 2011, Mai Dang wrote:

Hi,
I tried to remove the text starts by "--" to the end of the line as below


sql=c("-- This is a comment line",
        "select sysdate  -- This is a comment Text" ,
        " from dual ")
sql
[1] "-- This is a comment line"
[2] "select sysdate  -- This is a comment Text"
[3] " from dual "


I try to have this
sql
[1] "select sysdate "
[2] " from dual "

Thank You for your help,
Mai Dang

______________________________________________
[email protected] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.


______________________________________________
[email protected] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to