From: <George_Heine_at_blm.gov>

Date: Wed 30 Mar 2005 - 06:54:14 EST

points(zzz,rep(0,length(zzz)),col="red",pch="|")

pager gheine@my2way.com

*<>=<>=<>=<>=<>=<>=<>=<>=<>=<>=<>
*

R-help@stat.math.ethz.ch mailing list

https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html Received on Wed Mar 30 07:04:49 2005

Date: Wed 30 Mar 2005 - 06:54:14 EST

polygon(zzz,sin(25*zzz)*sin(zzz),border="blue") polygon(zzz,sin(5*zzz)*sin(zzz),border="green") polygon(zzz,sin(zzz),lwd=2)

points(zzz,rep(0,length(zzz)),col="red",pch="|")

Wrapping the following around each command works, sort of :

a<-expression(<command>)

x<-readline(a)

eval(a)

However, this doesn't work properly for the function definition, and it gets very clumsy to display two or three lines as a block and then evaluate.

Any help would be much appreciated.

*<>=<>=<>=<>=<>=<>=<>=<>=<>=<>=<>
*

George Heine, PhD

Mathematical Analyst

National IRM Center

U.S. Bureau of Land Management

voice (303) 236-0099

fax (303) 236-1974 cell (303) 905-5382

pager gheine@my2way.com

R-help@stat.math.ethz.ch mailing list

https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html Received on Wed Mar 30 07:04:49 2005

*
This archive was generated by hypermail 2.1.8
: Fri 03 Mar 2006 - 03:30:57 EST
*