Log[x] gives the natural logarithm of x and function is builid-in,but we can defining:
Ln[x_] := Log[x];
Limit of the height we can adjust by PlotRange.
PlotRange -> {{Range for X}, {Range for Y}, {Range for Z}}
Ln[x_] := Log[x];
RevolutionPlot3D[0.5*Ln[x^2], {x, 0, 1}, RevolutionAxis -> {0, 0, 1},
PlotStyle -> FaceForm[Red, Blue],
PlotRange -> {Automatic, {-0.6, 0}, Automatic}]
RevolutionPlot3D[0.5*Ln[x^2], {x, 0, 1}, RevolutionAxis -> {0, 0, 1},
PlotStyle -> FaceForm[Red, Blue],
PlotRange -> {{-0.6, 0}, {-0.6, 0}, Automatic}]