קובץ:Rational Elliptic Functions (xi varied, x=(-1,1)).svg
קפיצה לניווט
קפיצה לחיפוש
גודל התצוגה המקדימה הזאת מסוג PNG של קובץ ה־SVG הזה: 720 × 460 פיקסלים. רזולוציות אחרות: 320 × 204 פיקסלים | 640 × 409 פיקסלים | 1,024 × 654 פיקסלים | 1,280 × 818 פיקסלים | 2,560 × 1,636 פיקסלים.
לקובץ המקורי (קובץ SVG, הגודל המקורי: 720 × 460 פיקסלים, גודל הקובץ: 96 ק"ב)
| תיאור |
English: A graph of the fourth-degree rational elliptic function, R4(ξ,x) on the interval [−1,1]. ξ is the selectivity factor, and is varied in this graph. |
||
| תאריך יצירה | |||
| מקור | נוצר על־ידי מעלה היצירה | ||
| יוצר | Inductiveload | ||
| אישורים והיתרים (שימוש חוזר בקובץ זה) |
|
).svg){kind=link}
Mathematica Code
xp2[xi_] :=
Module[{g, num, den},
g = Sqrt[4*xi^2 + (4*xi^2*(xi^2 - 1))^(2/3)];
num = 2*xi^2*Sqrt[g];
den = Sqrt[8*xi^2*(xi^2 + 1) + 12*g*xi^2 - g^3] - Sqrt[g^3];
num/den
];
xz2[xi_] := xi^2/xp2[xi];
t[xi_] := Sqrt[1 - 1/xi^2];
r1[xi_, x_] := x;
r2[xi_, x_] := ((t[xi] + 1)*x^2 - 1)/((t[xi] - 1)*x^2 + 1);
r3[xi_, x_] :=
x*((1 - xp2[xi])*(x^2 - xz2[xi]))/((1 - xz2[xi])*(x^2 -
xp2[xi]));
r4[xi_, x_] :=
Module[{num, den},
num = (1 + t[xi]) (1 + Sqrt[t[xi]])^2*x^4 -
2 (1 + t[xi]) (1 + Sqrt[t[xi]])*x^2 + 1;
den = (1 + t[xi]) (1 - Sqrt[t[xi]])^2*x^4 -
2 (1 + t[xi]) (1 - Sqrt[t[xi]])*x^2 + 1;
num/den
];
Plot[
Table[
r4[xi, x],
{xi, {1.0001, 1.001, 1.01, 1.1, Infinity}}],
{x, -1, 1},
Axes -> False]
היסטוריית הקובץ
ניתן ללחוץ על תאריך/שעה כדי לראות את הקובץ כפי שנראה באותו זמן.
| תאריך/שעה | תמונה ממוזערת | ממדים | משתמש | הערה | |
|---|---|---|---|---|---|
| נוכחית | 05:02, 29 בינואר 2009 | | 460 × 720 (96 ק"ב) | wikimediacommons>Inductiveload | fixed y-axis title |
שימוש בקובץ
אין דפים המשתמשים בקובץ זה.
).svg){kind=link}