• Remix
  • Share
  • New Entry

  • Adam Danz

  • /
  • Daniel Pereira's Strawberry with seeds

on 6 Oct 2021
  • 9
  • 36
  • 0
  • 0
  • 276
y=1:-.002:-1;
x=sqrt((1-y.^2)./(1-y/2));
x=[x flip(-x)];
y=[y flip(y)];
patch(x,y,[0.75 0 0]);
hold
Current plot held
a=[1 1.2 0.2 0.4 0];
b=[1 1.4 1.2 1.4 1.8];
patch([a flip(-a)],[b flip(b)]-0.2,[0 0.6 0]);
axis equal off;
[c,d]=ndgrid(-1:.2:1,-.8:.2:.7);
c=c+mod(d*5,2)/10;
g=inpolygon(c,d,x,y);
plot(c(g),d(g),'k.')
Remix Tree