How kind I blueprint a pair of buttocks?

I absorb to confess that I spy this with out any consideration web web site, as I’m basically quite inventive in discovering/combining functions to provide a desired behavior. So I will give it one other strive.

which is generated using

field[x_, x1_, x2_, a_, b_] :=Tanh[a (x - x1)]   Tanh[-b (x - x2)];
ex[z_, z0_, s_] :=Exp[-(z - z0)^2/s]
(*and*)
r[z_, x_] :=(*body*).4 (1.0 - .4 ex[z, .8, .15]   
Sin[2 π x]^2   .6 ex[z, .8, .25] Cos[2 π x]^2   .3 Cos[2 π x]) 0.5 (1   Tanh[4 z])  
(*legs*)
(1 - .2 ex[z, -1.3, .9]) 0.5 (1   Tanh[-4 z]) (.5 (1   Sin[2 π x]^2  
 .3 Cos[2 π x])*((Abs[Sin[2 π x]])^1.3   .08 (1   Tanh[4 z])  )  )  
(*reinforce butt*)
.13 field[Cos[π x], -.45, .45, 5, 5] field[z, -.5, .2, 4, 2] - 
0.1 field[Cos[π x], -.008, .008, 30, 30] field[z, -.4, .25, 8, 6] - 
.05 Sin[π x]^16 field[z, -.55, -.35, 8, 18]
(*and in a roundabout scheme*) 
ParametricPlot3D[
(*shift butt belly*)
{.1 Exp[-(z-.8)^2/.6] - .18 Exp[-(z -.1)^2/.4], 0, 0}   {r[z, x] Cos[2 π x], r[z, x] Sin[2 π x],z}, 
{x, 0, 1}, {z, -1.5, 1.5},
PlotPoints -> {150, 50}, Mesh -> None,
AxesLabel -> {"x", "y", "z"}]

Edit What used to be the intention in generating the graph (answering the comment of @mcb)

Inspired by a number of of the solutions here and the truth that the real inquire of appears to be like to switch route Plot3D[] or ParametricPlot3D[], the muse is to make expend of a cylinder as defective. I remembered from completely different work that a parametric curve of kind 1 Cos[t] presents something butt-formed and 1 a Cos[t] might give something tackle a torso tainted piece. To scheme it rather bit extra elliptical I added a 1 Sin[t]^2kind.
Combining this already goes in the effective route.

Legs are also no longer very attractive. Perfect fold the cylinder into two by,e.g, Abs[Sin[t]]. To scheme the transition from legs to torso I expend a delicate step in conserving with Tanh[].

Next step is to push it inner and out in the effective intention (belly and butt), so there is a shift to the cylinder in conserving with Gaussians.

On the tip one provides facets tackle waist, etc. using Gaussians or adjustable delicate field-tackle functions.

Done, total no longer too attractive.