ファイル:Monkey Saddle Surface (Shaded).png

提供: testwiki
ナビゲーションに移動 検索に移動
元のファイル (1,575 × 1,181 ピクセル、ファイルサイズ: 720キロバイト、MIME タイプ: image/png)

このファイルはウィキメディア・コモンズのものであり、他のプロジェクトで使用されている可能性があります。 ウィキメディア・コモンズでのファイル解説ページにある説明を以下に示します。

概要

解説
English: A monkey saddle surface, with the equation . Done in MuPAD.
Русский: Поверхность Обезьянье седло, задаваемая уравнением . Сделано в MuPAD.
日付
原典 投稿者自身による著作物
作者 Inductiveload
許可
(ファイルの再利用)
Public domain この作品の著作権者である私は、この作品についての権利を放棄しパブリックドメインとします。これは全世界で適用されます。
一部の国では、これが法的に可能ではない場合があります。その場合は、次のように宣言します。
私は、あらゆる人に対して、法により必要とされている条件を除き、如何なる条件も課すことなく、あらゆる目的のためにこの著作物を使用する権利を与えます。
その他のバージョン
  • Unshaded Version
    Unshaded Version

MuPAD code

f := x^3-3*x*y^2:

  conts := 16:
  projectionlevel:=-1.5:

colourfunc := zip(RGB::Red, RGB::CornflowerBlue,
                  (a, b) -> (f(x,y)+1)/(2)*a
                           -(f(x,y)-1)/(2)*b):

funcplot := plot::Function3d(f(x,y),
                             x = -1..1,
                             y = -1..1,
                             Mesh = [24, 24],
                             Submesh=[8,8],
                             LineColor = RGB::Black.[0.99],
                             LineWidth = 0.1,
                             Filled = TRUE,
                             FillColorFunction = colourfunc,                             
                             AxesTitleFont = ["Courier New", 14],                       
                             ViewingBoxZRange = -1.5..1
                            ):

contours := plot::modify(funcplot,
                         ZContours = [Automatic, conts],
                         LineWidth = 0.15,
                         LineColor = RGB::Gray90.[0.5],
                         XLinesVisible = FALSE,
                         YLinesVisible = FALSE,
                         Filled = FALSE
                        ):
                        
projcontours := plot::Transform3d([0, 0, projectionlevel],
                                  [1, 0, 0, 0, 1, 0, 0, 0, 0], 
                                   plot::modify(funcplot, ZContours = [Automatic, conts],
                                                LineWidth = 0.2,
                                                LineColorType = Dichromatic,
                                                LineColor = RGB::Red.[0.99],
                                                LineColor2 = RGB::CornflowerBlue.[0.99],
                                                XLinesVisible = FALSE,
                                                YLinesVisible = FALSE,
                                                Filled = FALSE
                                               )
                                  ):
                             
camera := plot::Camera([16, -24, 30],
                       [0, 0, -0.25],
                       0.08
                      ):
                             
ploteverything := plot::Canvas(funcplot,projcontours, contours,
                               Width = 200*unit::mm, 
                               Height = 150*unit::mm, 
                               Axes = Boxed,
                               TicksVisible = FALSE ,
                               TicksLabelsVisible = FALSE,
                               AxesTitles = ["", "", ""],                                                
                               camera
                              ): 
                          
plot(ploteverything)

キャプション

このファイルの内容を1行で記述してください

このファイルに描写されている項目

題材

成立日

11 4 2006

ファイルの履歴

過去の版のファイルを表示するには、その版の日時をクリックしてください。

日時サムネイル寸法利用者コメント
現在の版2007年4月11日 (水) 23:462007年4月11日 (水) 23:46時点における版のサムネイル1,575 × 1,181 (720キロバイト)wikimediacommons>Inductiveload{{Information |Description=A monkey saddle surface, with the equation<br> <math>z=x^3-3xy^2 \,</math> |Source=Self-made, done in MuPad |Date=11/04/0206 |Author=User:Inductiveload |other_versions=[[:image:Monkey_Saddle_Surface_(Mesh).png|Unshaded Vers

以下のページがこのファイルを使用しています:

「https://ja.wiki.beta.math.wmflabs.org/wiki/ファイル:Monkey_Saddle_Surface_(Shaded).png」から取得