On 09/13/2012 04:19 AM, mail me wrote:> Hi:
>
> I am trying to find end of a FASTA file:
>
> library(ShortRead)
> fastadata <- readFasta("fastafolder", "fa$")
> file <- tempfile()
> writeFasta(fastadata, file)
> var1 <- readLines(file)
> while(countlength(tmp <- readLines(file, n = -1)) > 0) {
> #do something
> }
>
> I want the while loop to run till the end of file is reached, but the
> while statement dosent work. Thanks for help.
see the answer to your question on the Bioconductor mailing list.
https://stat.ethz.ch/pipermail/bioconductor/2012-September/048053.html
Martin
>
> Regards
> Jac
>
> ______________________________________________
> R-help at r-project.org 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.
>
--
Computational Biology / Fred Hutchinson Cancer Research Center
1100 Fairview Ave. N.
PO Box 19024 Seattle, WA 98109
Location: Arnold Building M1 B861
Phone: (206) 667-2793