Completa i seguenti comandi di R in modo da ottenere le figure a lato, chiamate superellissi, molto usate dai designer di mobili.
source("http://macosa.dima.unige.it/r.R") g = function(x,y) abs(x/A)^n + abs(y/B)^n - 1 n=2.5; ratioAB=6/5 PLANE(-8,8, -8,8) B=...; A=ratioAB*B; CURV(g,"black") B=...; A=ratioAB*B; CURV(g,"brown") B=...; A=ratioAB*B; CURV(g,"red") B=...; A=ratioAB*B; CURV(g,"seagreen") B=...; A=ratioAB*B; CURV(g,"blue") B=...; A=ratioAB*B; CURV(g,"black")

Basta porre B=1,...,B=6.
Il nome "superellisse" è stato coniato dallo scrittore e inventore danese Piet Hein, che, consultato da un gruppo di urbanisti che nel 1959 dovevano ricostruire una parte centrale di Stoccolma e volevano utilizzare una forma che fosse simile ad una ellisse ma meno "appuntita", utlizzò questa specie di "rectellipse" (vedi esercizio 7a.16 sullo spazio ad 1 e 2 dimensioni).
Questa forma venne poi utilizzata per fontane, scrivanie, sedie, letti, piatti, ... da architetti e produttori dei paesi nordici. Per qualche altra informazione vedi:  https://en.wikipedia.org/wiki/Superellipse