[R-sig-teaching] Folium of Descrates

[Michael Weylandt]

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 <sstoline at 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
> sstoline at gmail.com
>
>         [[alternative HTML version deleted]]
>
> _______________________________________________
> R-sig-teaching at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-sig-teaching