Najděte parametrické vyjádření asteroidy pro parametr .
Dosadíme pomocí příkazu subs:
> restart: > asteroid:=[(3/4)*R*cos((1/4)*t)+(1/4)*R*cos((3/4)*t),(3/4)*R*sin((1/4)*t)-(1/4)*R*sin((3/4)*t)];
> subs(t=4*tau,asteroid);
> simplify(%);