Dtjytyk

I have this:

begintikzpicture
beginaxis[hide axis, unit vector ratio=1 1 1, view=-3045]
addplot3 [surf, domain=0:360, y domain=-1:1] ( (10+y*cos(3*x/2)))*cos(x), (10+y*cos(3*x/2)))*sin(x), y*sin(3*x/2));
endaxis
endtikzpicture

But it doesn´t works. I don´t know the reason. I would like to obtain exactly one of these:

Additionally, I´d like to draw a simple Klein bottle (without grid or shadows), but in this case I´ve nothing... :(

Thanks for the support!!

EDIT: Kurt's answer is not valid for me. It has a grid and gray scale colors. So I can obtain since that example the wished draw! :S

A colored Moebius band (run with xelatex):

documentclass[pstricks]standalone
usepackagepst-3dplot

makeatletter
define@key[psset]pst-3dplotHueBegin% Between 0 and 1
 defPstHSB@HueBegin#1
define@key[psset]pst-3dplotHueEnd% Between 0 and 1
 defPstHSB@HueEnd#1
define@boolkey[psset]pst-3dplot[Pst@]HSB[true]
% Default values
psset[pst-3dplot]HueBegin=0,HueEnd=1,HSB=false
pssetdimen=outer

defparametricPlotThreeD@iii% without arrows (quickplot)
 addto@pscode%
 psk@ThreeDplot@yPlotpoints 
 /Counter 0 def
 /t tMin def
 xyz @nameusebeginqp@psplotstyle
 /t t dt add def
 psk@ThreeDplot@xPlotpointsspace 1 sub 
 xyz
 /Counter Counter 1 add def
 1 Counter eq moveto currentpoint /OldY ED /OldX ED 
 ifPst@HSB % Other points than the first one
 /PointY exch def
 /PointX exch def
 Counter psk@ThreeDplot@xPlotpointsspace div
 PstHSB@HueEndspace
 PstHSB@HueBeginspace sub mul
 PstHSB@HueBeginspace add
 1 1 sethsbcolor
 OldX OldY PointX PointY lineto lineto
 stroke
 PointX PointY moveto
 /OldX PointX def /OldY PointY def
 else lineto fi ifelse
 /t t dt add def
 repeat
 /t t dt sub def
 /u u du add def
 repeat
 %
 @nameuseendqp@psplotstyle%

makeatother

begindocument
pssetBeta=20
beginpspicture(-6,-3)(6,3)
defRadius5 
parametricplotThreeD[plotstyle=line,xPlotpoints=100,
 yPlotpoints=100,drawStyle=xyLines,HSB](0,365)(-1,1)
 t 2 div cos u mul Radius add t cos mul
 t 2 div cos u mul Radius add t sin mul
 t 2 div sin u mul 
%pstThreeDCoor[xMin=-1,yMin=-1,zMin=-1]
parametricplotThreeD[plotstyle=line,xPlotpoints=100,yPlotpoints=1,
 linecolor=black,linewidth=1.5pt](488,-60)
 t 2 div cos Radius add t cos mul
 t 2 div cos Radius add t sin mul
 t 2 div sin 
parametricplotThreeD[plotstyle=line,xPlotpoints=100,yPlotpoints=1,
 linecolor=black,linewidth=1.5pt](631,513)
 t 2 div cos Radius add t cos mul
 t 2 div cos Radius add t sin mul
 t 2 div sin 
endpspicture
enddocument 

Your code works (IMHO).

documentclass[tikz,border=3.14mm]standalone
usepackagepgfplots
pgfplotssetcompat=1.16
begindocument
begintikzpicture[declare function=moeb=3;phase=120;]
beginaxis[hide axis, unit vector ratio=1 1 1, view=-3045]
addplot3 [surf, domain=0:360, y domain=-2:2,point
meta=rawy,shader=interp,samples=51,samples y=2] ( 
 (10+y*cos(moeb*x/2+phase)))*cos(x), (10+y*cos(moeb*x/2+phase)))*sin(x), y*sin(moeb*x/2+phase));
endaxis
endtikzpicture
enddocument

You may change the plot by playing with moeb, phase and point meta.

I am not trying to give an exact answer but point out that your comment that gridded and grey is not desirable so taking your code example as found on this site with a few adjustments putting back we get this which I guess is a reasonable rendering
That does help many people to understand the nature of a mobeius

But if you try to remove the grid and the color as you have done you will at best get a dot.

Equally there are many answers for bottles on this site that you can adapt by removing the features you don't want, but removing the grids make them less understandable.

Thus you could remove the lables from this one https://tex.stackexchange.com/a/77643/170109

Making a labeled Klein bottle using TikZ or pgfplots?
pgfplots in combination with gnuplot requires additional semicolon
pgfplots exp(-pow(deg(x),2) on domain 0:2*pi

Note for those wondering where to get their hands on a party piece for serving wine look at the manufacturer of the largest in the world

(http://www.kleinbottle.com/wine_bottle_klein_bottle.html)