คุณชายน้อย
09 กรกฎาคม 2008, 02:08
Mathematica Programming เรื่อง Graph2D ตอนที่ 1
อารัมพบท
ในการคำนวณต่าง ๆ ในโปรแกรม Mathematica ผู้ใช้ต้องคำนึงถึงเซตของ Domain และ Range ของผลลัพธ์ที่ต้องการหาค่าเป็นสำคัญ ค่า Config การคำนวณในโปรแกรม Mathematica มีการคำนวณจาก $\mathbb{C} \rightarrow \mathbb{C} $ เมื่อ $\mathbb{C} $ เป็นจำนวนเชิงซ้อน ทำให้การคำนวณต่าง ๆ ที่อยู่ในเซตของจำนวนจริง $\mathbb{R} $ เกิด Error โดยที่ผู้ใช้ส่วนใหญ่มักจะคิดว่าเป็น Bug ของโปรแกรมหรือเกิดจากความไม่รู้จริงในการใช้โปรแกรม
Mathematica Programming เรื่อง Graph2D ตอนที่ 1
การวาด Graph2D ใน Mathematica เราจำเป็นต้องกำหนด Domain และ Range ใน Source Code เพื่อให้คำนวณจาก $\mathbb{R} \rightarrow \mathbb{R} $ ในคำสั่ง Plot หรือ ImplicitPlot โดยมีคำสั่งในการกำหนด Domain และ Range ที่เป็นจำนวนจริง ดังนี้
RealOnly /: On[RealOnly] := Get[ "Miscellaneous`RealOnly`"];
RealOnly /: Off[RealOnly] := (Unprotect[Power, Solve, Roots]; Clear[Power, Solve, Roots]; Protect[Power, Solve, Roots];Remove["Miscellaneous`RealOnly`Nonreal"]; $Post =. )
เมื่อต้องการเรียกใช้การคำนวณใน R ให้ใช้คำสั่ง On[RealOnly] และเมื่อคำนวณผลลัพธ์ที่ต้องการเสร็จแล้ว ให้คืน Config เดิม ด้วยคำสั่ง Off[RealOnly] ดังตัวอย่างต่อไปนี้
http://www.facsenate.mju.ac.th/Data/1215543368.JPG
อารัมพบท
ในการคำนวณต่าง ๆ ในโปรแกรม Mathematica ผู้ใช้ต้องคำนึงถึงเซตของ Domain และ Range ของผลลัพธ์ที่ต้องการหาค่าเป็นสำคัญ ค่า Config การคำนวณในโปรแกรม Mathematica มีการคำนวณจาก $\mathbb{C} \rightarrow \mathbb{C} $ เมื่อ $\mathbb{C} $ เป็นจำนวนเชิงซ้อน ทำให้การคำนวณต่าง ๆ ที่อยู่ในเซตของจำนวนจริง $\mathbb{R} $ เกิด Error โดยที่ผู้ใช้ส่วนใหญ่มักจะคิดว่าเป็น Bug ของโปรแกรมหรือเกิดจากความไม่รู้จริงในการใช้โปรแกรม
Mathematica Programming เรื่อง Graph2D ตอนที่ 1
การวาด Graph2D ใน Mathematica เราจำเป็นต้องกำหนด Domain และ Range ใน Source Code เพื่อให้คำนวณจาก $\mathbb{R} \rightarrow \mathbb{R} $ ในคำสั่ง Plot หรือ ImplicitPlot โดยมีคำสั่งในการกำหนด Domain และ Range ที่เป็นจำนวนจริง ดังนี้
RealOnly /: On[RealOnly] := Get[ "Miscellaneous`RealOnly`"];
RealOnly /: Off[RealOnly] := (Unprotect[Power, Solve, Roots]; Clear[Power, Solve, Roots]; Protect[Power, Solve, Roots];Remove["Miscellaneous`RealOnly`Nonreal"]; $Post =. )
เมื่อต้องการเรียกใช้การคำนวณใน R ให้ใช้คำสั่ง On[RealOnly] และเมื่อคำนวณผลลัพธ์ที่ต้องการเสร็จแล้ว ให้คืน Config เดิม ด้วยคำสั่ง Off[RealOnly] ดังตัวอย่างต่อไปนี้
http://www.facsenate.mju.ac.th/Data/1215543368.JPG