ภาพนี้มีภาพในรูปแบบเวกเตอร์ (SVG) หากภาพ SVG ทำให้การแสดงผลดีกว่า หน้าที่ใช้ภาพนี้ควรเปลี่ยนไปใช้ภาพ SVG แทน File:Paraboloid of Revolution.png → File:Paraboloid of Revolution.svg สำหรับข้อมูลเพิ่มเติมเกี่ยวกับภาพเวกเตอร์ ดูที่ การเปลี่ยนไปใช้ภาพ SVG ในคอมมอนส์ นอกจากนี้สามารถดูเพิ่มเติมเกี่ยวกับ ข้อมูลเกี่ยวกับการรองรับภาพ SVG สำหรับซอฟต์แวร์มีเดียวิกิ ได้ ในภาษาอื่นๆ Alemannisch ∙ العربية ∙ беларуская (тарашкевіца) ∙ български ∙ বাংলা ∙ català ∙ нохчийн ∙ čeština ∙ dansk ∙ Deutsch ∙ Ελληνικά ∙ English ∙ British English ∙ Esperanto ∙ español ∙ eesti ∙ euskara ∙ فارسی ∙ suomi ∙ français ∙ Frysk ∙ galego ∙ Alemannisch ∙ עברית ∙ हिन्दी ∙ hrvatski ∙ magyar ∙ հայերեն ∙ Bahasa Indonesia ∙ Ido ∙ italiano ∙ 日本語 ∙ ქართული ∙ 한국어 ∙ lietuvių ∙ македонски ∙ മലയാളം ∙ Bahasa Melayu ∙ မြန်မာဘာသာ ∙ norsk bokmål ∙ Plattdüütsch ∙ Nederlands ∙ norsk nynorsk ∙ norsk ∙ occitan ∙ polski ∙ prūsiskan ∙ português ∙ português do Brasil ∙ română ∙ русский ∙ sicilianu ∙ Scots ∙ slovenčina ∙ slovenščina ∙ српски / srpski ∙ svenska ∙ தமிழ் ∙ ไทย ∙ Türkçe ∙ татарча / tatarça ∙ українська ∙ vèneto ∙ Tiếng Việt ∙ 中文 ∙ 中文（中国大陆） ∙ 中文（简体） ∙ 中文（繁體） ∙ 中文（马来西亚） ∙ 中文（新加坡） ∙ 中文（臺灣） ∙ +/−

 

คำอธิบายParaboloid of Revolution.png	A 3D rendering of the paraboloid given parametrically by: ${\displaystyle x={\sqrt {u}}\cos(v)\,}$ ${\displaystyle y={\sqrt {u}}\sin(v)\,}$ ${\displaystyle z=u\,}$
วันที่	12 เมษายน พ.ศ. 2550 (upload date)
แหล่งที่มา	Self-made, using Mathematica 5.1.
ผู้สร้างสรรค์	Inductiveload
การอนุญาต (การใช้ไฟล์นี้ใหม่)	Public domainPublic domainfalsefalse ภาพนี้ ขาดคุณสมบัติสำหรับการมีลิขสิทธิ์ ดังนั้นภาพนี้จึงเป็น สาธารณสมบัติ เนื่องจากเป็นสมบัติส่วนรวมและไม่มีการระบุความเป็นเจ้าของ ประกาศนี้มีผลทั่วโลก

This code does not require any modules to be loaded. It uses Chris Hill's Anti-aliasing code.

gr = ParametricPlot3D[
      {Sqrt[u]Cos[v], Sqrt[u]Sin[v], u, {EdgeForm[AbsoluteThickness[4]]}},
      {u, 0, 1},
      {v, 0, 2π},
      BoxRatios -> {1, 1, 0.8},
      PlotPoints -> {10, 50},
      Ticks -> False,
      Axes -> False,
      Boxed -> False,
      ImageSize -> 800];

aa[gr_] := Module[{siz, kersiz, ker, dat, as, ave, is, ar},
    is = ImageSize /. Options[gr, ImageSize];
    ar = AspectRatio /. Options[gr, AspectRatio];
    If[! NumberQ[is], is = 288];
    kersiz = 4;
    img = ImportString[ExportString[gr, PNG, ImageSize -> (is kersiz)], PNG];
    siz = Reverse@Dimensions[img[[1, 1]]][[{1, 2}]];
    ker = Table[N[1/kersiz^2], {kersiz}, {kersiz}];
    dat = N[img[[1, 1]]];
    as = Dimensions[dat];
    ave = Partition[Transpose[Flatten[
        ListConvolve[ker, dat[[All, All, #]]]] & /@ Range[as[[3]]]], 
    as[[2]] - kersiz + 1];
    ave = Take[ave, Sequence @@ ({1, Dimensions[ave][[#]], kersiz} & /@ Range[
    Length[Dimensions[ave]] - 1])];
    Show[Graphics[Raster[ave, {{0, 0}, 
          siz/kersiz}, {0, 255}, ColorFunction -> RGBColor]], PlotRange -> \
{{0, siz[[1]]/kersiz}, {0, siz[[2]]/kersiz}}, ImageSize -> is, AspectRatio -> 
      ar]
    ]
finalgraphic = aa[gr]