Use the t-parametrized form from e.g., http://mathworld.wolfram.com/FoliumofDescartes.html
t <- seq(-50, 50, by=0.01) x <- 3*t/(1+t^3) y <- 3*t^2/(1+t^3) plot(x, y, xlim=c(-5, 5), ylim=c(-5, 5), type="l") (I'm limiting the plot to avoid the huge values that occur near t=-1) Michael On Wed, May 18, 2016 at 2:00 PM, Steven Stoline <sstol...@gmail.com> wrote: > Dear All: > > > can someone please help me to plot the *Folium of Descrates:** x^3+y^3=3xy > for x<-seq(-5,5,0.010) and **y<-seq(-5,5,0.010) * > > > with thanks > steve > > -- > Steven M. Stoline > 1123 Forest Avenue > Portland, ME 04112 > sstol...@gmail.com > > [[alternative HTML version deleted]] > > _______________________________________________ > R-sig-teaching@r-project.org mailing list > https://stat.ethz.ch/mailman/listinfo/r-sig-teaching _______________________________________________ R-sig-teaching@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-sig-teaching