Π‘ Π½Π°ΠΌΠΈ Π»Π΅Π³ΠΊΠΎ Π² ΡΠ΅ΠΆΠΈΠΌΠ΅ ΠΎΠ½Π»Π°ΠΉΠ½ ΡΡΡΠΎΠΈΡΡ Π³ΡΠ°ΡΠΈΠΊΠΈ ΡΠ°Π·Π»ΠΈΡΠ½ΠΎΠΉ ΡΠ»ΠΎΠΆΠ½ΠΎΡΡΠΈ. ΠΠΎΡΡΡΠΎΠ΅Π½ΠΈΠ΅ ΠΏΡΠΎΠΈΠ·Π²ΠΎΠ΄ΠΈΡΡΡ ΠΌΠ³Π½ΠΎΠ²Π΅Π½Π½ΠΎ. Π‘Π΅ΡΠ²ΠΈΡ Π²ΠΎΡΡΡΠ΅Π±ΠΎΠ²Π°Π½ Π΄Π»Ρ Π½Π°Ρ ΠΎΠΆΠ΄Π΅Π½ΠΈΡ ΡΠΎΡΠ΅ΠΊ ΠΏΠ΅ΡΠ΅ΡΠ΅ΡΠ΅Π½ΠΈΡ ΡΡΠ½ΠΊΡΠΈΠΉ, Π΄Π»Ρ ΠΈΠ·ΠΎΠ±ΡΠ°ΠΆΠ΅Π½ΠΈΡ Π³ΡΠ°ΡΠΈΠΊΠΎΠ² Π΄Π»Ρ Π΄Π°Π»ΡΠ½Π΅ΠΉΡΠ΅Π³ΠΎ ΠΈΡ ΠΏΠ΅ΡΠ΅ΠΌΠ΅ΡΠ΅Π½ΠΈΡ Π² Word Π΄ΠΎΠΊΡΠΌΠ΅Π½Ρ Π² ΠΊΠ°ΡΠ΅ΡΡΠ²Π΅ ΠΈΠ»Π»ΡΡΡΡΠ°ΡΠΈΠΉ ΠΏΡΠΈ ΡΠ΅ΡΠ΅Π½ΠΈΠΈ Π·Π°Π΄Π°Ρ, Π΄Π»Ρ Π°Π½Π°Π»ΠΈΠ·Π° ΠΏΠΎΠ²Π΅Π΄Π΅Π½ΡΠ΅ΡΠΊΠΈΡ ΠΎΡΠΎΠ±Π΅Π½Π½ΠΎΡΡΠ΅ΠΉ Π³ΡΠ°ΡΠΈΠΊΠΎΠ² ΡΡΠ½ΠΊΡΠΈΠΉ. ΠΠΏΡΠΈΠΌΠ°Π»ΡΠ½ΡΠΌ Π±ΡΠ°ΡΠ·Π΅ΡΠΎΠΌ Π΄Π»Ρ ΡΠ°Π±ΠΎΡΡ Ρ Π³ΡΠ°ΡΠΈΠΊΠ°ΠΌΠΈ Π½Π° Π΄Π°Π½Π½ΠΎΠΉ ΡΡΡΠ°Π½ΠΈΡΠ΅ ΡΠ°ΠΉΡΠ° ΡΠ²Π»ΡΠ΅ΡΡΡ Google Chrome. ΠΡΠΈ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠΈ Π΄ΡΡΠ³ΠΈΡ Π±ΡΠ°ΡΠ·Π΅ΡΠΎΠ² ΠΊΠΎΡΡΠ΅ΠΊΡΠ½ΠΎΡΡΡ ΡΠ°Π±ΠΎΡΡ Π½Π΅ Π³Π°ΡΠ°Π½ΡΠΈΡΡΠ΅ΡΡΡ.
ΠΠΎΡΡΡΠΎΠΈΡΡ ΠΊΡΠΈΠ²ΡΡ, Π·Π°Π΄Π°Π½Π½ΡΡ ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠΈΡΠ΅ΡΠΊΠΈΠΌΠΈ ΡΡΠ°Π²Π½Π΅Π½ΠΈΡΠΌΠΈ \
ΠΡΡΠ»Π΅Π΄ΡΠ΅ΠΌ ΡΠ½Π°ΡΠ°Π»Π° Π³ΡΠ°ΡΠΈΠΊΠΈ ΡΡΠ½ΠΊΡΠΈΠΉ \(x\left(t \right)\) ΠΈ \(x\left(t \right)\).
ΠΠ° Π²ΡΠΎΡΠΎΠΌ ΠΏΡΠΎΠΌΠ΅ΠΆΡΡΠΊΠ΅ \(\left({ β 2, β 1} \right)\) ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½Π°Ρ \(x\) Π²ΠΎΠ·ΡΠ°ΡΡΠ°Π΅Ρ ΠΎΡ \(x\left({ β 2} \right) = β 2\)
Π΄ΠΎ \(x\left({ β 1} \right) = 1,\) Π° ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½Π°Ρ \(y\) ΡΠ±ΡΠ²Π°Π΅Ρ ΠΎΡ \(y\left({ β 2} \right) = 8\) Π΄ΠΎ
\(y\left({ β 1} \right) = 5.
ΠΠ° ΡΡΠ΅ΡΡΠ΅ΠΌ ΠΈΠ½ΡΠ΅ΡΠ²Π°Π»Π΅ \(\left({ β 1,\large\frac{1}{3}\normalsize} \right)\) ΠΎΠ±Π΅ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΠ΅ ΡΠ±ΡΠ²Π°ΡΡ. ΠΠ½Π°ΡΠ΅Π½ΠΈΠ΅ \(x\) ΠΈΠ·ΠΌΠ΅Π½ΡΠ΅ΡΡΡ ΠΎΡ \(x\left({ β 1} \right) = 1\) Π΄ΠΎ \(x\left({\large\frac{1}{3}\normalsize} \right) = β \large\frac{5}{{27}}\normalsize.\) Π‘ΠΎΠΎΡΠ²Π΅ΡΡΡΠ²Π΅Π½Π½ΠΎ, Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ \(y\) ΡΠΌΠ΅Π½ΡΡΠ°Π΅ΡΡΡ ΠΎΡ \(y\left({ β 1} \right) = 5\) Π΄ΠΎ \(y\left({\large\frac{1}{3}\normalsize} \right) = β \large\frac{29}{{27}}\normalsize.\) ΠΡΠΈΠ²Π°Ρ \(y\left(x \right)\) ΠΏΡΠΈ ΡΡΠΎΠΌ ΠΏΠ΅ΡΠ΅ΡΠ΅ΠΊΠ°Π΅Ρ Π½Π°ΡΠ°Π»ΠΎ ΠΊΠΎΠΎΡΠ΄ΠΈΠ½Π°Ρ.
ΠΠ° ΡΠ΅ΡΠ²Π΅ΡΡΠΎΠΌ ΠΈΠ½ΡΠ΅ΡΠ²Π°Π»Π΅ \(\left({\large\frac{1}{3}\normalsize,\large\frac{2}{3}\normalsize} \right)\)
ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½Π°Ρ \(x\) Π²ΠΎΠ·ΡΠ°ΡΡΠ°Π΅Ρ ΠΎΡ \(x\left({\large\frac{1}{3}\normalsize} \right) = β \large\frac{5}{{27}}\normalsize\)
Π΄ΠΎ \(x\left({\large\frac{2}{3}\normalsize} \right) = \large\frac{2}{{27}}\normalsize,\)
Π° ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½Π°Ρ \(y\) ΡΠ±ΡΠ²Π°Π΅Ρ ΠΎΡ \(y\left({\large\frac{1}{3}\normalsize} \right) = β \large\frac{29}{{27}}\normalsize\)
Π΄ΠΎ \(y\left({\large\frac{2}{3}\normalsize} \right) = β \large\frac{40}{{27}}\normalsize.
ΠΡΡΠ»Π΅Π΄ΡΠ΅ΠΌ ΡΠ°ΠΊΠΆΠ΅ Π²ΡΠΏΡΠΊΠ»ΠΎΡΡΡ Π΄Π°Π½Π½ΠΎΠΉ ΠΊΡΠΈΠ²ΠΎΠΉ. ΠΡΠΎΡΠ°Ρ ΠΏΡΠΎΠΈΠ·Π²ΠΎΠ΄Π½Π°Ρ
\(y»»\left(x \right)\) ΠΈΠΌΠ΅Π΅Ρ Π²ΠΈΠ΄:
\[
y»»\left(x \right) = {y»»_{xx}} = \frac{{{{\left({{y»_x}} \right)}»_t}}}{{{x»_t}}}
= \frac{{{{\left({\frac{{3{t^2} + 4t β 4}}{{3{t^2} + 2t β 1}}} \right)}^\prime }}}{{{{\left({{t^3} + {t^2} β t} \right)}^\prime }}}
= \frac{{\left({6t + 4} \right)\left({3{t^2} + 2t β 1} \right) β \left({3{t^2} + 4t β 4} \right)\left({6t + 2} \right)}}{{{{\left({3{t^2} + 2t β 1} \right)}^3}}}
= \frac{{18{t^3} + 12{t^2} + 12{t^2} + 8t β 6t β 4 β \left({18{t^3} + 24{t^2} β 24t + 6{t^2} + 8t β 8} \right)}}{{{{\left({3{t^2} + 2t β 1} \right)}^3}}}
= \frac{{\cancel{\color{blue}{18{t^3}}} + \color{red}{24{t^2}} + \color{green}{2t} β \color{maroon}{4} β \cancel{\color{blue}{18{t^3}}} β \color{red}{30{t^2}} + \color{green}{16t} + \color{maroon}{8}}}{{{{\left({3{t^2} + 2t β 1} \right)}^3}}}
= \frac{{ β \color{red}{6{t^2}} + \color{green}{18t} + \color{maroon}{4}}}{{{{\left({3{t^2} + 2t β 1} \right)}^3}}}
= \frac{{ β 6\left({t β \frac{{9 β \sqrt {105} }}{6}} \right)\left({t β \frac{{9 + \sqrt {105} }}{6}} \right)}}{{{{\left({t + 1} \right)}^3}{{\left({3t β 1} \right)}^3}}}. \]
Π‘Π»Π΅Π΄ΠΎΠ²Π°ΡΠ΅Π»ΡΠ½ΠΎ, Π²ΡΠΎΡΠ°Ρ ΠΏΡΠΎΠΈΠ·Π²ΠΎΠ΄Π½Π°Ρ ΠΌΠ΅Π½ΡΠ΅Ρ ΡΠ²ΠΎΠΉ Π·Π½Π°ΠΊ Π½Π° ΠΏΡΠΎΡΠΈΠ²ΠΎΠΏΠΎΠ»ΠΎΠΆΠ½ΡΠΉ ΠΏΡΠΈ ΠΏΠ΅ΡΠ΅Ρ
ΠΎΠ΄Π΅ ΡΠ΅ΡΠ΅Π· ΡΠ»Π΅Π΄ΡΡΡΠΈΠ΅ ΡΠΎΡΠΊΠΈ (ΡΠΈΡ.\(15Ρ\)):
\[
{{t_1} = β 1:\;\;x\left({ β 1} \right) = 1,}\;\;
{y\left({ β 1} \right) = 5;}
\]
\[
{{t_2} = \frac{{9 β \sqrt {105} }}{6}:}\;\;
{x\left({\frac{{9 β \sqrt {105} }}{6}} \right) \approx 0,24;}\;\;
{y\left({\frac{{9 β \sqrt {105} }}{6}} \right) \approx 0,91;}
\]
\[
{{t_3} = \frac{1}{3}:}\;\;
{x\left({\frac{1}{3}} \right) = β \frac{5}{{27}},}\;\;
{y\left({\frac{1}{3}} \right) = β \frac{{29}}{{27}};}
\]
\[
{{t_4} = \frac{{9 + \sqrt {105} }}{6}:}\;\;
{x\left({\frac{{9 + \sqrt {105} }}{6}} \right) \approx 40,1;}\;\;
{y\left({\frac{{9 + \sqrt {105} }}{6}} \right) \approx 40,8.}
\]
ΠΠΎΡΡΠΎΠΌΡ ΡΠΊΠ°Π·Π°Π½Π½ΡΠ΅ ΡΠΎΡΠΊΠΈ ΠΏΡΠ΅Π΄ΡΡΠ°Π²Π»ΡΡΡ ΡΠΎΠ±ΠΎΠΉ ΡΠΎΡΠΊΠΈ ΠΏΠ΅ΡΠ΅Π³ΠΈΠ±Π° ΠΊΡΠΈΠ²ΠΎΠΉ \(y\left(x \right).\)
Π‘Ρ Π΅ΠΌΠ°ΡΠΈΡΠ΅ΡΠΊΠΈΠΉ Π³ΡΠ°ΡΠΈΠΊ ΠΊΡΠΈΠ²ΠΎΠΉ \(y\left(x \right)\) ΠΏΠΎΠΊΠ°Π·Π°Π½ Π²ΡΡΠ΅ Π½Π° ΡΠΈΡΡΠ½ΠΊΠ΅ \(15b.\)
Β«ΠΡΠ΅ΠΎΠ±ΡΠ°Π·ΠΎΠ²Π°Π½ΠΈΠ΅ ΡΡΠ½ΠΊΡΠΈΠΉΒ» β ΠΠ°ΡΠ΅Π»ΡΠΌΠΈ. Π‘Π΄Π²ΠΈΠ³ ΠΏΠΎ ΠΎΡΠΈ y Π²Π²Π΅ΡΡ
. ΠΠΊΠ»ΡΡΠΈ ΠΏΠΎΠ»Π½ΡΡ Π³ΡΠΎΠΌΠΊΠΎΡΡΡ β ΡΠ²Π΅Π»ΠΈΡΠΈΡΡ a (Π°ΠΌΠΏΠ»ΠΈΡΡΠ΄Ρ) ΠΊΠΎΠ»Π΅Π±Π°Π½ΠΈΠΉ Π²ΠΎΠ·Π΄ΡΡ
Π°. Π‘Π΄Π²ΠΈΠ³ ΠΏΠΎ ΠΎΡΠΈ x Π²Π»Π΅Π²ΠΎ. ΠΠ°Π΄Π°ΡΠΈ ΡΡΠΎΠΊΠ°. 3 Π±Π°Π»Π»Π°. ΠΡΠ·ΡΠΊΠΎΠΉ. ΠΠΎΡΡΡΠΎΠΉΡΠ΅ Π³ΡΠ°ΡΠΈΠΊ ΡΡΠ½ΠΊΡΠΈΠΈ ΠΈ ΠΎΠΏΡΠ΅Π΄Π΅Π»ΠΈΡΠ΅ D(f), E(f) ΠΈ T: Π‘ΠΆΠ°ΡΠΈΠ΅ ΠΏΠΎ ΠΎΡΠΈ x. Π‘Π΄Π²ΠΈΠ³ ΠΏΠΎ ΠΎΡΠΈ y Π²Π½ΠΈΠ·. ΠΠΎΠ±Π°Π²Ρ ΠΊΡΠ°ΡΠ½ΠΎΠ³ΠΎ ΡΠ²Π΅ΡΠ° Π² ΠΏΠ°Π»ΠΈΡΡΡ β ΡΠΌΠ΅Π½ΡΡΠΈΡΡ k (ΡΠ°ΡΡΠΎΡΡ) ΡΠ»Π΅ΠΊΡΡΠΎΠΌΠ°Π³Π½ΠΈΡΠ½ΡΡ
ΠΊΠΎΠ»Π΅Π±Π°Π½ΠΈΠΉ.
Β«Π€ΡΠ½ΠΊΡΠΈΠΈ Π½Π΅ΡΠΊΠΎΠ»ΡΠΊΠΈΡ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΡ Β» β ΠΡΠΎΠΈΠ·Π²ΠΎΠ΄Π½ΡΠ΅ Π²ΡΡΡΠΈΡ ΠΏΠΎΡΡΠ΄ΠΊΠΎΠ². Π€ΡΠ½ΠΊΡΠΈΡ Π΄Π²ΡΡ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΡ ΠΌΠΎΠΆΠ½ΠΎ ΠΈΠ·ΠΎΠ±ΡΠ°Π·ΠΈΡΡ Π³ΡΠ°ΡΠΈΡΠ΅ΡΠΊΠΈ. ΠΠΈΡΡΠ΅ΡΠ΅Π½ΡΠΈΠ°Π»ΡΠ½ΠΎΠ΅ ΠΈ ΠΈΠ½ΡΠ΅Π³ΡΠ°Π»ΡΠ½ΠΎΠ΅ ΠΈΡΡΠΈΡΠ»Π΅Π½ΠΈΡ. ΠΠ½ΡΡΡΠ΅Π½Π½ΠΈΠ΅ ΠΈ Π³ΡΠ°Π½ΠΈΡΠ½ΡΠ΅ ΡΠΎΡΠΊΠΈ. ΠΠΏΡΠ΅Π΄Π΅Π»Π΅Π½ΠΈΠ΅ ΠΏΡΠ΅Π΄Π΅Π»Π° ΡΡΠ½ΠΊΡΠΈΠΈ 2-Ρ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΡ . ΠΡΡΡ ΠΌΠ°ΡΠ΅ΠΌΠ°ΡΠΈΡΠ΅ΡΠΊΠΎΠ³ΠΎ Π°Π½Π°Π»ΠΈΠ·Π°. ΠΠ΅ΡΠΌΠ°Π½. ΠΡΠ΅Π΄Π΅Π» ΡΡΠ½ΠΊΡΠΈΠΈ 2-Ρ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΡ . ΠΡΠ°ΡΠΈΠΊ ΡΡΠ½ΠΊΡΠΈΠΈ. Π’Π΅ΠΎΡΠ΅ΠΌΠ°. ΠΠ³ΡΠ°Π½ΠΈΡΠ΅Π½Π½Π°Ρ ΠΎΠ±Π»Π°ΡΡΡ.
Β«ΠΠΎΠ½ΡΡΠΈΠ΅ ΡΡΠ½ΠΊΡΠΈΠΈΒ» β Π‘ΠΏΠΎΡΠΎΠ±Ρ ΠΏΠΎΡΡΡΠΎΠ΅Π½ΠΈΠ΅ Π³ΡΠ°ΡΠΈΠΊΠΎΠ² ΠΊΠ²Π°Π΄ΡΠ°ΡΠΈΡΠ½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ. ΠΠ·ΡΡΠ΅Π½ΠΈΠ΅ ΡΠ°Π·Π½ΡΡ ΡΠΏΠΎΡΠΎΠ±ΠΎΠ² Π·Π°Π΄Π°Π½ΠΈΡ ΡΡΠ½ΠΊΡΠΈΠΈ β Π²Π°ΠΆΠ½ΡΠΉ ΠΌΠ΅ΡΠΎΠ΄ΠΈΡΠ΅ΡΠΊΠΈΠΉ ΠΏΡΠΈΠ΅ΠΌ. ΠΡΠΎΠ±Π΅Π½Π½ΠΎΡΡΠΈ ΠΈΠ·ΡΡΠ΅Π½ΠΈΡ ΠΊΠ²Π°Π΄ΡΠ°ΡΠΈΡΠ½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ. ΠΠ΅Π½Π΅ΡΠΈΡΠ΅ΡΠΊΠ°Ρ ΡΡΠ°ΠΊΡΠΎΠ²ΠΊΠ° ΠΏΠΎΠ½ΡΡΠΈΡ Β«ΡΡΠ½ΠΊΡΠΈΡΒ». Π€ΡΠ½ΠΊΡΠΈΠΈ ΠΈ Π³ΡΠ°ΡΠΈΠΊΠΈ Π² ΡΠΊΠΎΠ»ΡΠ½ΠΎΠΌ ΠΊΡΡΡΠ΅ ΠΌΠ°ΡΠ΅ΠΌΠ°ΡΠΈΠΊΠΈ. ΠΡΠ΅Π΄ΡΡΠ°Π²Π»Π΅Π½ΠΈΠ΅ ΠΎ Π»ΠΈΠ½Π΅ΠΉΠ½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ Π²ΡΠ΄Π΅Π»ΡΠ΅ΡΡΡ ΠΏΡΠΈ ΠΏΠΎΡΡΡΠΎΠ΅Π½ΠΈΠΈ Π³ΡΠ°ΡΠΈΠΊΠ° Π½Π΅ΠΊΠΎΡΠΎΡΠΎΠΉ Π»ΠΈΠ½Π΅ΠΉΠ½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ.
Β«Π’Π΅ΠΌΠ° Π€ΡΠ½ΠΊΡΠΈΡΒ» β ΠΠ½Π°Π»ΠΈΠ·. ΠΡΠΆΠ½ΠΎ Π²ΡΡΡΠ½ΠΈΡΡ Π½Π΅ ΡΠΎ, ΡΡΠΎ ΡΡΠ΅Π½ΠΈΠΊ Π½Π΅ Π·Π½Π°Π΅Ρ, Π° ΡΠΎ, ΡΡΠΎ ΠΎΠ½ Π·Π½Π°Π΅Ρ. ΠΠ°Π»ΠΎΠΆΠ΅Π½ΠΈΠ΅ ΠΎΡΠ½ΠΎΠ² Π΄Π»Ρ ΡΡΠΏΠ΅ΡΠ½ΠΎΠΉ ΡΠ΄Π°ΡΠΈ ΠΠΠ ΠΈ ΠΏΠΎΡΡΡΠΏΠ»Π΅Π½ΠΈΠ΅ Π² ΠΠ£ΠΡ. Π‘ΠΈΠ½ΡΠ΅Π·. ΠΡΠ»ΠΈ ΡΡΠ΅Π½ΠΈΠΊΠΈ ΡΠ°Π±ΠΎΡΠ°ΡΡ ΠΏΠΎ-ΡΠ°Π·Π½ΠΎΠΌΡ, ΡΠΎ ΠΈ ΡΡΠΈΡΠ΅Π»Ρ Π΄ΠΎΠ»ΠΆΠ΅Π½ Ρ Π½ΠΈΠΌΠΈ ΡΠ°Π±ΠΎΡΠ°ΡΡ ΠΏΠΎ-ΡΠ°Π·Π½ΠΎΠΌΡ. ΠΠ½Π°Π»ΠΎΠ³ΠΈΡ. ΠΠ±ΠΎΠ±ΡΠ΅Π½ΠΈΠ΅. Π Π°ΡΠΏΡΠ΅Π΄Π΅Π»Π΅Π½ΠΈΠ΅ Π·Π°Π΄Π°Π½ΠΈΠΉ ΠΠΠ ΠΏΠΎ ΠΎΡΠ½ΠΎΠ²Π½ΡΠΌ Π±Π»ΠΎΠΊΠ°ΠΌ ΡΠΎΠ΄Π΅ΡΠΆΠ°Π½ΠΈΡ ΡΠΊΠΎΠ»ΡΠ½ΠΎΠ³ΠΎ ΠΊΡΡΡΠ° ΠΌΠ°ΡΠ΅ΠΌΠ°ΡΠΈΠΊΠΈ.
Β«ΠΡΠ΅ΠΎΠ±ΡΠ°Π·ΠΎΠ²Π°Π½ΠΈΠ΅ Π³ΡΠ°ΡΠΈΠΊΠΎΠ² ΡΡΠ½ΠΊΡΠΈΠΉΒ» β ΠΠΎΠ²ΡΠΎΡΠΈΡΡ Π²ΠΈΠ΄Ρ ΠΏΡΠ΅ΠΎΠ±ΡΠ°Π·ΠΎΠ²Π°Π½ΠΈΠΉ Π³ΡΠ°ΡΠΈΠΊΠΎΠ². Π‘ΠΎΠΏΠΎΡΡΠ°Π²ΠΈΡΡ ΠΊΠ°ΠΆΠ΄ΠΎΠΌΡ Π³ΡΠ°ΡΠΈΠΊΡ ΡΡΠ½ΠΊΡΠΈΡ. Π‘ΠΈΠΌΠΌΠ΅ΡΡΠΈΡ. Π¦Π΅Π»Ρ ΡΡΠΎΠΊΠ°: ΠΠΎΡΡΡΠΎΠ΅Π½ΠΈΠ΅ Π³ΡΠ°ΡΠΈΠΊΠΎΠ² ΡΠ»ΠΎΠΆΠ½ΡΡ ΡΡΠ½ΠΊΡΠΈΠΉ. Π Π°ΡΡΠΌΠΎΡΡΠΈΠΌ ΠΏΡΠΈΠΌΠ΅ΡΡ ΠΏΡΠ΅ΠΎΠ±ΡΠ°Π·ΠΎΠ²Π°Π½ΠΈΠΉ, ΠΎΠ±ΡΡΡΠ½ΠΈΠΌ ΠΊΠ°ΠΆΠ΄ΡΠΉ Π²ΠΈΠ΄ ΠΏΡΠ΅ΠΎΠ±ΡΠ°Π·ΠΎΠ²Π°Π½ΠΈΡ. ΠΡΠ΅ΠΎΠ±ΡΠ°Π·ΠΎΠ²Π°Π½ΠΈΠ΅ Π³ΡΠ°ΡΠΈΠΊΠΎΠ² ΡΡΠ½ΠΊΡΠΈΠΉ. Π Π°ΡΡΡΠΆΠ΅Π½ΠΈΠ΅. ΠΠ°ΠΊΡΠ΅ΠΏΠΈΡΡ ΠΏΠΎΡΡΡΠΎΠ΅Π½ΠΈΠ΅ Π³ΡΠ°ΡΠΈΠΊΠΎΠ² ΡΡΠ½ΠΊΡΠΈΠΉ Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠ΅ΠΌ ΠΏΡΠ΅ΠΎΠ±ΡΠ°Π·ΠΎΠ²Π°Π½ΠΈΠΉ Π³ΡΠ°ΡΠΈΠΊΠΎΠ² ΡΠ»Π΅ΠΌΠ΅Π½ΡΠ°ΡΠ½ΡΡ ΡΡΠ½ΠΊΡΠΈΠΉ.
Β«ΠΡΠ°ΡΠΈΠΊΠΈ ΡΡΠ½ΠΊΡΠΈΠΉΒ» β Π€ΡΠ½ΠΊΡΠΈΡ Π²ΠΈΠ΄Π°. ΠΠ±Π»Π°ΡΡΡ Π·Π½Π°ΡΠ΅Π½ΠΈΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ β Π²ΡΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΡ Π·Π°Π²ΠΈΡΠΈΠΌΠΎΠΉ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΠΎΠΉ Ρ. ΠΡΠ°ΡΠΈΠΊΠΎΠΌ ΡΡΠ½ΠΊΡΠΈΠΈ ΡΠ²Π»ΡΠ΅ΡΡΡ ΠΏΠ°ΡΠ°Π±ΠΎΠ»Π°. ΠΡΠ°ΡΠΈΠΊΠΎΠΌ ΡΡΠ½ΠΊΡΠΈΠΈ ΡΠ²Π»ΡΠ΅ΡΡΡ ΠΊΡΠ±ΠΈΡΠ΅ΡΠΊΠ°Ρ ΠΏΠ°ΡΠ°Π±ΠΎΠ»Π°. ΠΡΠ°ΡΠΈΠΊΠΎΠΌ ΡΡΠ½ΠΊΡΠΈΠΈ ΡΠ²Π»ΡΠ΅ΡΡΡ Π³ΠΈΠΏΠ΅ΡΠ±ΠΎΠ»Π°. ΠΠ±Π»Π°ΡΡΡ ΠΎΠΏΡΠ΅Π΄Π΅Π»Π΅Π½ΠΈΡ ΠΈ ΠΎΠ±Π»Π°ΡΡΡ Π·Π½Π°ΡΠ΅Π½ΠΈΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ. ΠΠ°ΠΆΠ΄ΡΡ ΠΏΡΡΠΌΡΡ ΡΠΎΠΎΡΠ½Π΅ΡΠΈΡΠ΅ Ρ Π΅Ρ ΡΡΠ°Π²Π½Π΅Π½ΠΈΠ΅ΠΌ: ΠΠ±Π»Π°ΡΡΡ ΠΎΠΏΡΠ΅Π΄Π΅Π»Π΅Π½ΠΈΡ ΡΡΠ½ΠΊΡΠΈΠΈ β Π²ΡΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΡ Π½Π΅Π·Π°Π²ΠΈΡΠΈΠΌΠΎΠΉ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΠΎΠΉ Ρ
.
ΠΠ»Π°Π½ ΠΏΠΎΡΡΡΠΎΠ΅Π½ΠΈΡ ΠΊΠ²Π°Π΄ΡΠ°ΡΠΈΡΠ½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ.
1. ΠΠ±Π»Π°ΡΡΡ ΠΎΠΏΡΠ΅Π΄Π΅Π»Π΅Π½ΠΈΡ ΡΡΠ½ΠΊΡΠΈΠΈ (D (y )).
2. ΠΡΠ°ΡΠΈΠΊΠΎΠΌ Π΄Π°Π½Π½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ ΡΠ²Π»ΡΠ΅ΡΡΡ ΠΏΠ°ΡΠ°Π±ΠΎΠ»Π°, Π²Π΅ΡΠ²ΠΈ ΠΊΠΎΡΠΎΡΠΎΠΉ Π½Π°ΠΏΡΠ°Π²Π»Π΅Π½Ρ Π²Π²Π΅ΡΡ (Π²Π½ΠΈΠ·), Ρ.ΠΊ. Π° = __ > 0 (Π° = __
3. ΠΠΎΠΎΡΠ΄ΠΈΠ½Π°ΡΡ Π²Π΅ΡΡΠΈΠ½Ρ ΠΏΠ°ΡΠ°Π±ΠΎΠ»Ρ.
4. Π£ΡΠ°Π²Π½Π΅Π½ΠΈΠ΅ ΠΎΡΠΈ ΡΠΈΠΌΠΌΠ΅ΡΡΠΈΠΈ.
5. Π’ΠΎΡΠΊΠ° ΠΏΠ΅ΡΠ΅ΡΠ΅ΡΠ΅Π½ΠΈΡ Π³ΡΠ°ΡΠΈΠΊΠ° Ρ ΠΎΡΡΡ OY .
6. ΠΡΠ»ΠΈ ΡΡΠ½ΠΊΡΠΈΠΈ.
7. Π’Π°Π±Π»ΠΈΡΠ° Π·Π½Π°ΡΠ΅Π½ΠΈΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ.
8. ΠΡΠ°ΡΠΈΠΊ.
ΠΡΠΈΠΌΠ΅Ρ ΠΏΠΎΡΡΡΠΎΠ΅Π½ΠΈΡ Π³ΡΠ°ΡΠΈΠΊΠ° ΡΡΠ½ΠΊΡΠΈΠΈ y = x 2 β 4 x + 3
1. D (y ) = (- β; + β).
2. ΠΡΠ°ΡΠΈΠΊΠΎΠΌ Π΄Π°Π½Π½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ ΡΠ²Π»ΡΠ΅ΡΡΡ ΠΏΠ°ΡΠ°Π±ΠΎΠ»Π°, Π²Π΅ΡΠ²ΠΈ ΠΊΠΎΡΠΎΡΠΎΠΉ Π½Π°ΠΏΡΠ°Π²Π»Π΅Π½Ρ Π²Π²Π΅ΡΡ , Ρ. ΠΊ. Π° = 1 > 0.
3. ΠΠΎΠΎΡΠ΄ΠΈΠ½Π°ΡΡ Π²Π΅ΡΡΠΈΠ½Ρ ΠΏΠ°ΡΠ°Π±ΠΎΠ»Ρ:
x 0 = β , y 0 = 2 2 β 4Β·2 + 3 = 4 β 8 + 3 = β 1.
4. Π£ΡΠ°Π²Π½Π΅Π½ΠΈΠ΅ ΠΎΡΠΈ ΡΠΈΠΌΠΌΠ΅ΡΡΠΈΠΈ x = 2.
5. Π’ΠΎΡΠΊΠ° ΠΏΠ΅ΡΠ΅ΡΠ΅ΡΠ΅Π½ΠΈΡ Ρ ΠΎΡΡΡ OY (0; 3).
6. ΠΡΠ»ΠΈ ΡΡΠ½ΠΊΡΠΈΠΈ:
x 2 β 4 x + 3 = 0 D = (- 4) 2 β 4 Β·1Β·3 = 16 -12 = 4 = 2 2
x 1 = = 1 x 2 = = 3
7. Π‘ΠΎΡΡΠ°Π²ΠΈΠΌ ΡΠ°Π±Π»ΠΈΡΡ Π·Π½Π°ΡΠ΅Π½ΠΈΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ:
0
1
2
3
3
0
β 1
0
8. ΠΠΎΡΡΡΠΎΠΈΠΌ Π³ΡΠ°ΡΠΈΠΊ
Π‘Π²ΠΎΠΉΡΡΠ²Π° ΡΡΠ½ΠΊΡΠΈΠΈ:
1. ΠΠ½ΠΎΠΆΠ΅ΡΡΠ²ΠΎ Π·Π½Π°ΡΠ΅Π½ΠΈΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ (E (y )).
2. ΠΡΠΎΠΌΠ΅ΠΆΡΡΠΊΠΈ Π·Π½Π°ΠΊΠΎΠΏΠΎΡΡΠΎΡΠ½ΡΡΠ²Π° ΡΡΠ½ΠΊΡΠΈΠΈ (y >0, y
3. ΠΡΠΎΠΌΠ΅ΠΆΡΡΠΊΠΈ ΠΌΠΎΠ½ΠΎΡΠΎΠ½Π½ΠΎΡΡΠΈ ΡΡΠ½ΠΊΡΠΈΠΈ (Π²ΠΎΠ·ΡΠ°ΡΡΠ°Π΅Ρ, ΡΠ±ΡΠ²Π°Π΅Ρ).
4. Π’ΠΎΡΠΊΠΈ ΠΌΠ°ΠΊΡΠΈΠΌΡΠΌΠ° ΠΈ ΠΌΠΈΠ½ΠΈΠΌΡΠΌΠ° ΡΡΠ½ΠΊΡΠΈΠΈ.
Π‘Π²ΠΎΠΉΡΡΠ²Π° ΡΡΠ½ΠΊΡΠΈΠΈ y = x 2 β 4 x + 3.
1. E (y ) = [-1; + β).
2. y
Π Π°Π·Π±Π΅ΡΠ΅ΠΌ ΠΊΠ°ΠΊ ΡΡΡΠΎΠΈΡΡ Π³ΡΠ°ΡΠΈΠΊ Ρ ΠΌΠΎΠ΄ΡΠ»Π΅ΠΌ.
ΠΠ°ΠΉΠ΄Π΅ΠΌ ΡΠΎΡΠΊΠΈ ΠΏΡΠΈ ΠΏΠ΅ΡΠ΅Ρ
ΠΎΠ΄Π΅ ΠΊΠΎΡΠΎΡΡΡ
Π·Π½Π°ΠΊ ΠΌΠΎΠ΄ΡΠ»Π΅ΠΉ ΠΌΠ΅Π½ΡΠ΅ΡΡΡ.
ΠΠ°ΠΆΠ΄ΠΎΠ΅ Π²ΡΡΠ°ΠΆΠ΅Π½ΠΈΡ, ΠΊΠΎΡΠΎΡΠΎΠ΅ ΠΏΠΎΠ΄ ΠΌΠΎΠ΄ΡΠ»Π΅ΠΌ ΠΏΡΠΈΡΠ°Π²Π½ΠΈΠ²Π°Π΅ΠΌ ΠΊ 0. Π£ Π½Π°Ρ ΠΈΡ
Π΄Π²Π° x-3 ΠΈ x+3.
x-3=0 ΠΈ x+3=0
x=3 ΠΈ x=-3
Π£ Π½Π°Ρ ΡΠΈΡΠ»ΠΎΠ²Π°Ρ ΠΏΡΡΠΌΠ°Ρ ΡΠ°Π·Π΄Π΅Π»ΠΈΡΡΡ Π½Π° ΡΡΠΈ ΠΈΠ½ΡΠ΅ΡΠ²Π°Π»Π° (-β;-3)U(-3;3)U(3;+β). ΠΠ° ΠΊΠ°ΠΆΠ΄ΠΎΠΌ ΠΈΠ½ΡΠ΅ΡΠ²Π°Π»Π΅ Π½ΡΠΆΠ½ΠΎ ΠΎΠΏΡΠ΅Π΄Π΅Π»ΠΈΡΡ Π·Π½Π°ΠΊ ΠΏΠΎΠ΄ ΠΌΠΎΠ΄ΡΠ»ΡΠ½ΡΡ
Π²ΡΡΠ°ΠΆΠ΅Π½ΠΈΠΉ.
1. ΠΡΠΎ ΡΠ΄Π΅Π»Π°ΡΡ ΠΎΡΠ΅Π½Ρ ΠΏΡΠΎΡΡΠΎ, ΡΠ°ΡΡΠΌΠΎΡΡΠΈΠΌ ΠΏΠ΅ΡΠ²ΡΠΉ ΠΈΠ½ΡΠ΅ΡΠ²Π°Π» (-β;-3). ΠΠΎΠ·ΡΠΌΠ΅ΠΌ Ρ ΡΡΠΎΠ³ΠΎ ΠΎΡΡΠ΅Π·ΠΊΠ° Π»ΡΠ±ΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅, Π½Π°ΠΏΡΠΈΠΌΠ΅Ρ, -4 ΠΈ ΠΏΠΎΠ΄ΡΡΠ°Π²ΠΈΠΌ Π² ΠΊΠ°ΠΆΠ΄ΠΎΠ΅ ΠΏΠΎΠ΄ ΠΌΠΎΠ΄ΡΠ»ΡΠ½ΠΎΠ΅ ΡΡΠ°Π²Π½Π΅Π½ΠΈΠ΅ Π²ΠΌΠ΅ΡΡΠΎ Π·Π½Π°ΡΠ΅Π½ΠΈΡ Ρ
.
x-3=-4-3=-7 ΠΈ x+3=-4+3=-1
Π£ ΠΎΠ±ΠΎΠΈΡ Π²ΡΡΠ°ΠΆΠ΅Π½ΠΈΠΉ Π·Π½Π°ΠΊΠΈ ΠΎΡΡΠΈΡΠ°ΡΠ΅Π»ΡΠ½ΡΠΉ, Π·Π½Π°ΡΠΈΡ ΠΏΠ΅ΡΠ΅Π΄ Π·Π½Π°ΠΊΠΎΠΌ ΠΌΠΎΠ΄ΡΠ»Ρ Π² ΡΡΠ°Π²Π½Π΅Π½ΠΈΠΈ ΡΡΠ°Π²ΠΈΠΌ ΠΌΠΈΠ½ΡΡ, Π° Π²ΠΌΠ΅ΡΡΠΎ Π·Π½Π°ΠΊΠ° ΠΌΠΎΠ΄ΡΠ»Ρ ΡΡΠ°Π²ΠΈΠΌ ΡΠΊΠΎΠ±ΠΊΠΈ ΠΈ ΠΏΠΎΠ»ΡΡΠΈΠΌ ΠΈΡΠΊΠΎΠΌΠΎΠ΅ ΡΡΠ°Π²Π½Π΅Π½ΠΈΠ΅ Π½Π° ΠΈΠ½ΡΠ΅ΡΠ²Π°Π»Π΅ (-β;-3).
y=β (x-3)-(β (x+3))=-Ρ +3+Ρ +3=6
ΠΠ° ΠΈΠ½ΡΠ΅ΡΠ²Π°Π»Π΅ (-β;-3) ΠΏΠΎΠ»ΡΡΠΈΠ»ΡΡ Π³ΡΠ°ΡΠΈΠΊ Π»ΠΈΠ½Π΅ΠΉΠ½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ (ΠΏΡΡΠΌΠΎΠΉ) Ρ=6
2. Π Π°ΡΡΠΌΠΎΡΡΠΈΠΌ Π²ΡΠΎΡΠΎΠΉ ΠΈΠ½ΡΠ΅ΡΠ²Π°Π» (-3;3). ΠΠ°ΠΉΠ΄Π΅ΠΌ ΠΊΠ°ΠΊ Π±ΡΠ΄Π΅Ρ Π²ΡΠ³Π»ΡΠ΄Π΅ΡΡ ΡΡΠ°Π²Π½Π΅Π½ΠΈΠ΅ Π³ΡΠ°ΡΠΈΠΊΠ° Π½Π° ΡΡΠΎΠΌ ΠΎΡΡΠ΅Π·ΠΊΠ΅. ΠΠΎΠ·ΡΠΌΠ΅ΠΌ Π»ΡΠ±ΠΎΠ΅ ΡΠΈΡΠ»ΠΎ ΠΎΡ -3 Π΄ΠΎ 3, Π½Π°ΠΏΡΠΈΠΌΠ΅Ρ, 0. ΠΠΎΠ΄ΡΡΠ°Π²ΠΈΠΌ Π²ΠΌΠ΅ΡΡΠΎ Π·Π½Π°ΡΠ΅Π½ΠΈΡ Ρ
Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ 0.
Ρ
=0
x-3=0-3=-3 ΠΈ x+3=0+3=3
Π£ ΠΏΠ΅ΡΠ²ΠΎΠ³ΠΎ Π²ΡΡΠ°ΠΆΠ΅Π½ΠΈΡ x-3 Π·Π½Π°ΠΊ ΠΎΡΡΠΈΡΠ°ΡΠ΅Π»ΡΠ½ΡΠΉ ΠΏΠΎΠ»ΡΡΠΈΠ»ΡΡ, Π° Ρ Π²ΡΠΎΡΠΎΠ³ΠΎ Π²ΡΡΠ°ΠΆΠ΅Π½ΠΈΡ x+3 ΠΏΠΎΠ»ΠΎΠΆΠΈΡΠ΅Π»ΡΠ½ΡΠΉ. Π‘Π»Π΅Π΄ΠΎΠ²Π°ΡΠ΅Π»ΡΠ½ΠΎ, ΠΏΠ΅ΡΠ΅Π΄ Π²ΡΡΠ°ΠΆΠ΅Π½ΠΈΠ΅ΠΌ x-3 Π·Π°ΠΏΠΈΡΠ΅ΠΌ Π·Π½Π°ΠΊ ΠΌΠΈΠ½ΡΡ, Π° ΠΏΠ΅ΡΠ΅Π΄ Π²ΡΠΎΡΡΠΌ Π²ΡΡΠ°ΠΆΠ΅Π½ΠΈΠ΅ΠΌ Π·Π½Π°ΠΊ ΠΏΠ»ΡΡ.
y=β (x-3)-(+ (x+3))=-Ρ +3-Ρ -3=-2x
ΠΠ° ΠΈΠ½ΡΠ΅ΡΠ²Π°Π»Π΅ (-3;3) ΠΏΠΎΠ»ΡΡΠΈΠ»ΡΡ Π³ΡΠ°ΡΠΈΠΊ Π»ΠΈΠ½Π΅ΠΉΠ½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ (ΠΏΡΡΠΌΠΎΠΉ) Ρ=-2Ρ
3.
Ρ
=5
x-3=5-3=2 ΠΈ x+3=5+3=8
Π£ ΠΎΠ±ΠΎΠΈΡ Π²ΡΡΠ°ΠΆΠ΅Π½ΠΈΠΉ Π·Π½Π°ΠΊΠΈ ΠΏΠΎΠ»ΡΡΠΈΠ»ΠΈΡΡ ΠΏΠΎΠ»ΠΎΠΆΠΈΡΠ΅Π»ΡΠ½ΡΠΌΠΈ, Π·Π½Π°ΡΠΈΡ ΠΏΠ΅ΡΠ΅Π΄ Π·Π½Π°ΠΊΠΎΠΌ ΠΌΠΎΠ΄ΡΠ»Ρ Π² ΡΡΠ°Π²Π½Π΅Π½ΠΈΠΈ ΡΡΠ°Π²ΠΈΠΌ ΠΏΠ»ΡΡ, Π° Π²ΠΌΠ΅ΡΡΠΎ Π·Π½Π°ΠΊΠ° ΠΌΠΎΠ΄ΡΠ»Ρ ΡΡΠ°Π²ΠΈΠΌ ΡΠΊΠΎΠ±ΠΊΠΈ ΠΈ ΠΏΠΎΠ»ΡΡΠΈΠΌ ΠΈΡΠΊΠΎΠΌΠΎΠ΅ ΡΡΠ°Π²Π½Π΅Π½ΠΈΠ΅ Π½Π° ΠΈΠ½ΡΠ΅ΡΠ²Π°Π»Π΅ (3;+β).
y=+ (x-3)-(+ (x+3))=Ρ -3-Ρ -3=-6
ΠΠ° ΠΈΠ½ΡΠ΅ΡΠ²Π°Π»Π΅ (3;+β) ΠΏΠΎΠ»ΡΡΠΈΠ»ΡΡ Π³ΡΠ°ΡΠΈΠΊ Π»ΠΈΠ½Π΅ΠΉΠ½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ (ΠΏΡΡΠΌΠΎΠΉ) Ρ=-6
4. Π’Π΅ΠΏΠ΅ΡΡ ΠΏΠΎΠ΄Π²Π΅Π΄Π΅ΠΌ ΠΈΡΠΎΠ³.ΠΠΎΡΡΠΎΠΈΠΌ Π³ΡΠ°ΡΠΈΠΊ y=|x-3|-|x+3|.
ΠΠ° ΠΈΠ½ΡΠ΅ΡΠ²Π°Π»Π΅ (-β;-3) ΡΡΡΠΎΠΈΠΌ Π³ΡΠ°ΡΠΈΠΊ Π»ΠΈΠ½Π΅ΠΉΠ½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ (ΠΏΡΡΠΌΠΎΠΉ) Ρ=6.
ΠΠ° ΠΈΠ½ΡΠ΅ΡΠ²Π°Π»Π΅ (-3;3) ΡΡΡΠΎΠΈΠΌ Π³ΡΠ°ΡΠΈΠΊ Π»ΠΈΠ½Π΅ΠΉΠ½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ (ΠΏΡΡΠΌΠΎΠΉ) Ρ=-2Ρ
.
Π§ΡΠΎΠ±Ρ ΠΏΠΎΡΡΡΠΎΠΈΡΡ Π³ΡΠ°ΡΠΈΠΊ Ρ=-2Ρ
ΠΏΠΎΠ΄Π±Π΅ΡΠ΅ΠΌ Π½Π΅ΡΠΊΠΎΠ»ΡΠΊΠΎ ΡΠΎΡΠ΅ΠΊ.
x=-3 y=-2*(-3)=6 ΠΏΠΎΠ»ΡΡΠΈΠ»Π°ΡΡ ΡΠΎΡΠΊΠ° (-3;6)
x=0 y=-2*0=0 ΠΏΠΎΠ»ΡΡΠΈΠ»Π°ΡΡ ΡΠΎΡΠΊΠ° (0;0)
x=3 y=-2*(3)=-6 ΠΏΠΎΠ»ΡΡΠΈΠ»Π°ΡΡ ΡΠΎΡΠΊΠ° (3;-6)
ΠΠ° ΠΈΠ½ΡΠ΅ΡΠ²Π°Π»Π΅ (3;+β) ΡΡΡΠΎΠΈΠΌ Π³ΡΠ°ΡΠΈΠΊ Π»ΠΈΠ½Π΅ΠΉΠ½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ (ΠΏΡΡΠΌΠΎΠΉ) Ρ=-6.
5. Π’Π΅ΠΏΠ΅ΡΡ ΠΏΡΠΎΠ°Π½Π°Π»ΠΈΠ·ΠΈΡΡΠ΅ΠΌ ΡΠ΅Π·ΡΠ»ΡΡΠ°Ρ ΠΈ ΠΎΡΠ²Π΅ΡΠΈΠΌ Π½Π° Π²ΠΎΠΏΡΠΎΡ Π·Π°Π΄Π°Π½ΠΈΡ Π½Π°ΠΉΠ΄Π΅ΠΌ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ k, ΠΏΡΠΈ ΠΊΠΎΡΠΎΡΡΡ
ΠΏΡΡΠΌΠ°Ρ y=kx ΠΈΠΌΠ΅Π΅Ρ Ρ Π³ΡΠ°ΡΠΈΠΊΠΎΠΌ y=|x-3|-|x+3| Π΄Π°Π½Π½ΠΎΠΉ ΡΡΠ½ΠΊΡΠΈΠΈ ΡΠΎΠ²Π½ΠΎ ΠΎΠ΄Π½Ρ ΠΎΠ±ΡΡΡ ΡΠΎΡΠΊΡ.
ΠΡΡΠΌΠ°Ρ y=kx ΠΏΡΠΈ Π»ΡΠ±ΠΎΠΌ Π·Π½Π°ΡΠ΅Π½ΠΈΠΈ k Π²ΡΠ΅Π³Π΄Π° Π±ΡΠ΄Π΅Ρ ΠΏΡΠΎΡ ΠΎΠ΄ΠΈΡΡ ΡΠ΅ΡΠ΅Π· ΡΠΎΡΠΊΡ (0;0). ΠΠΎΡΡΠΎΠΌΡ ΠΌΡ ΠΌΠΎΠΆΠ΅ΠΌ ΠΈΠ·ΠΌΠ΅Π½ΠΈΡΡ ΡΠΎΠ»ΡΠΊΠΎ Π½Π°ΠΊΠ»ΠΎΠ½ Π΄Π°Π½Π½ΠΎΠΉ ΠΏΡΡΠΌΠΎΠΉ y=kx, Π° Π·Π° Π½Π°ΠΊΠ»ΠΎΠ½ Ρ Π½Π°Ρ ΠΎΡΠ²Π΅ΡΠ°Π΅Ρ ΠΊΠΎΡΡΡΠΈΡΠΈΠ΅Π½Ρ k.
ΠΡΠ»ΠΈ k Π±ΡΠ΄Π΅Ρ Π»ΡΠ±ΠΎΠ΅ ΠΏΠΎΠ»ΠΎΠΆΠΈΡΠ΅Π»ΡΠ½ΠΎΠ΅ ΡΠΈΡΠ»ΠΎ, ΡΠΎ Π±ΡΠ΄Π΅Ρ ΠΎΠ΄Π½ΠΎ ΠΏΠ΅ΡΠ΅ΡΠ΅ΡΠ΅Π½ΠΈΠ΅ ΠΏΡΡΠΌΠΎΠΉ y=kx Ρ Π³ΡΠ°ΡΠΈΠΊΠΎΠΌ y=|x-3|-|x+3|. ΠΡΠΎΡ Π²Π°ΡΠΈΠ°Π½Ρ Π½Π°ΠΌ ΠΏΠΎΠ΄Ρ ΠΎΠ΄ΠΈΡ.
ΠΡΠ»ΠΈ k Π±ΡΠ΄Π΅Ρ ΠΏΡΠΈΠ½ΠΈΠΌΠ°ΡΡ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ (-2;0), ΡΠΎ ΠΏΠ΅ΡΠ΅ΡΠ΅ΡΠ΅Π½ΠΈΠΉ ΠΏΡΡΠΌΠΎΠΉ y=kx Ρ Π³ΡΠ°ΡΠΈΠΊΠΎΠΌ y=|x-3|-|x+3| Π±ΡΠ΄Π΅Ρ ΡΡΠΈ.ΠΡΠΎΡ Π²Π°ΡΠΈΠ°Π½Ρ Π½Π°ΠΌ Π½Π΅ ΠΏΠΎΠ΄Ρ ΠΎΠ΄ΠΈΡ.
ΠΡΠ»ΠΈ k=-2, ΡΠ΅ΡΠ΅Π½ΠΈΠΉ Π±ΡΠ΄Π΅Ρ ΠΌΠ½ΠΎΠΆΠ΅ΡΡΠ²ΠΎ [-2;2], ΠΏΠΎΡΠΎΠΌΡ ΡΡΠΎ ΠΏΡΡΠΌΠ°Ρ y=kx Π±ΡΠ΄Π΅Ρ ΡΠΎΠ²ΠΏΠ°Π΄Π°ΡΡ Ρ Π³ΡΠ°ΡΠΈΠΊΠΎΠΌ y=|x-3|-|x+3| Π½Π° Π΄Π°Π½Π½ΠΎΠΌ ΡΡΠ°ΡΡΠΊΠ΅. ΠΡΠΎΡ Π²Π°ΡΠΈΠ°Π½Ρ Π½Π°ΠΌ Π½Π΅ ΠΏΠΎΠ΄Ρ ΠΎΠ΄ΠΈΡ.
ΠΡΠ»ΠΈ k=0, ΡΠΎ ΠΏΠ΅ΡΠ΅ΡΠ΅ΡΠ΅Π½ΠΈΠΉ ΠΏΡΡΠΌΠΎΠΉ y=kx Ρ Π³ΡΠ°ΡΠΈΠΊΠΎΠΌ y=|x-3|-|x+3| ΡΠ°ΠΊΠΆΠ΅ Π±ΡΠ΄Π΅Ρ ΠΎΠ΄Π½ΠΎ. ΠΡΠΎΡ Π²Π°ΡΠΈΠ°Π½Ρ Π½Π°ΠΌ ΠΏΠΎΠ΄Ρ
ΠΎΠ΄ΠΈΡ.
ΠΡΠ²Π΅Ρ: ΠΏΡΠΈ k ΠΏΡΠΈΠ½Π°Π΄Π»Π΅ΠΆΠ°ΡΠ΅ΠΉ ΠΈΠ½ΡΠ΅ΡΠ²Π°Π»Ρ (-β;-2)U}
ΠΠΠΠΠ ΠΠΠΠ Π ΠΠ‘ΠΠ ΠΠΠΠΠΠΠΠ― Π² ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΠΈΡΠΎΠ²Π°Π½ΠΈΠΈ R π’ [Π‘ ΠΠ ΠΠΠΠ ΠΠΠ]
ΠΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ β ΡΡΠΎ Π΄ΠΈΡΠΏΠ΅ΡΡΠΈΠΎΠ½Π½ΡΡ Π³ΡΠ°ΡΠΈΠΊΠ°, ΠΏΠΎΡΡΡΠΎΠ΅Π½Π½ΡΡ Π΄Π»Ρ ΠΏΡΠ΅Π΄ΡΡΠ°Π²Π»Π΅Π½ΠΈΡ ΡΠΎΡΠ΅ΠΊ Π΄Π°Π½Π½ΡΡ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΡ (ΠΎΠ±ΡΡΠ½ΠΎ Π΄Π²ΡΡ , Π½ΠΎ ΡΠ°ΠΊΠΆΠ΅ ΠΌΠΎΠΆΠ΅Ρ Π±ΡΡΡ ΠΈ ΡΡΠΈ). ΠΡΠ½ΠΎΠ²Π½ΠΎΠ΅ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠ΅ ΡΠΎΡΠ΅ΡΠ½ΠΎΠΉ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ Π² R β Π²ΠΈΠ·ΡΠ°Π»ΡΠ½ΠΎ ΠΏΡΠΎΠ²Π΅ΡΠΈΡΡ, ΡΡΡΠ΅ΡΡΠ²ΡΠ΅Ρ Π»ΠΈ ΠΊΠ°ΠΊΠ°Ρ-ΡΠΎ ΡΠ²ΡΠ·Ρ ΠΌΠ΅ΠΆΠ΄Ρ ΡΠΈΡΠ»ΠΎΠ²ΡΠΌΠΈ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΠΌΠΈ.
- 1 ΠΠ°ΠΊ ΡΠ΄Π΅Π»Π°ΡΡ ΡΠΎΡΠ΅ΡΠ½ΡΠΉ Π³ΡΠ°ΡΠΈΠΊ Π² R?
- 1.1 ΠΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ Π² R Ρ ΡΠ°Π·Π½ΡΠΌΠΈ ΡΠ²Π΅ΡΠ°ΠΌΠΈ
- 1.2 ΠΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ Ρ Π»ΠΈΠ½ΠΈΠ΅ΠΉ ΡΠ΅Π³ΡΠ΅ΡΡΠΈΠΈ
- 1.3 ΠΠΎΠ±Π°Π²Π»Π΅Π½ΠΈΠ΅ Π½Π΅ΡΠΊΠΎΠ»ΡΠΊΠΈΡ ΡΡΠ΄ΠΎΠ² ΠΊ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ΅ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ R
- 1,4 ΠΡΠ°ΡΠΈΠΊ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ Ρ ΡΡΠ΅ΡΠΆΠ½ΡΠΌΠΈ ΠΎΡΠΈΠ±ΠΎΠΊ Π² R
- 1.5 ΠΠΎΠ΄ΠΊΠ»ΡΡΠ΅Π½Π½ΡΠΉ ΡΠ°ΡΡΠ΅ΡΠ½Π½ΡΠΉ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌ Π² R
- 2 Π³Π»Π°Π΄ΠΊΠΈΠΉ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ Ρ ΡΡΠ½ΠΊΡΠΈΠ΅ΠΉ Π³Π»Π°Π΄ΠΊΠΎΠ³ΠΎ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ
- 2.1 Heat Map R Scatter Drise
- 3 Π€ΡΠ½ΠΊΡΠΈΡ Scatterplot Π² R 9007 40010
- 3 Π€ΡΠ½ΠΊΡΠΈΡ Scatterplot Π² R
- 40010
- ΠΌΠ°ΡΡΠΈΡΠ° Π² R
- 5 Π’ΠΎΡΠ΅ΡΠ½Π°Ρ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° Π² ggplot2
- 6 3D R ΡΠΎΡΠ΅ΡΠ½Π°Ρ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ°
ΠΠ°ΠΊ ΡΠ΄Π΅Π»Π°ΡΡ ΡΠΎΡΠ΅ΡΠ½ΡΡ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ Π² R?
ΠΡ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΡΠΎΠ·Π΄Π°ΡΡ ΡΠΎΡΠ΅ΡΠ½ΡΡ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ Π² R Ρ Π³ΡΠ°ΡΠΈΠΊΠΎΠΌ
, ΡΠΊΠ°Π·Π°Π² Π·Π½Π°ΡΠ΅Π½ΠΈΡ x Π² ΠΏΠ΅ΡΠ²ΠΎΠΌ Π°ΡΠ³ΡΠΌΠ΅Π½ΡΠ΅ ΠΈ Π·Π½Π°ΡΠ΅Π½ΠΈΡ y Π²ΠΎ Π²ΡΠΎΡΠΎΠΌ, ΡΠ²Π»ΡΡΡΠΈΠ΅ΡΡ ΡΠΈΡΠ»ΠΎΠ²ΡΠΌΠΈ Π²Π΅ΠΊΡΠΎΡΠ°ΠΌΠΈ x ΠΈ y ΠΎΠ΄ΠΈΠ½Π°ΠΊΠΎΠ²ΠΎΠΉ Π΄Π»ΠΈΠ½Ρ. ΠΡΠΈ ΠΏΠ΅ΡΠ΅Π΄Π°ΡΠ΅ ΡΡΠΈΡ
ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠΎΠ² ΡΡΠ½ΠΊΡΠΈΡ
plot
ΠΏΠΎ ΡΠΌΠΎΠ»ΡΠ°Π½ΠΈΡ ΡΠΎΠ·Π΄Π°ΡΡ ΡΠΎΡΠ΅ΡΠ½ΡΡ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ. ΠΡ ΡΠ°ΠΊΠΆΠ΅ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΡΠΊΠ°Π·Π°ΡΡ ΡΠΈΠΌΠ²ΠΎΠ» ΡΠΎΡΠ΅ΠΊ Π΄Π°Π½Π½ΡΡ
ΠΈΠ»ΠΈ Π΄Π°ΠΆΠ΅ ΡΠ²Π΅Ρ ΡΡΠ΅Π΄ΠΈ Π΄ΡΡΠ³ΠΈΡ
Π³ΡΠ°ΡΠΈΡΠ΅ΡΠΊΠΈΡ
ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠΎΠ². ΠΡ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΠΏΡΠΎΡΠΌΠΎΡΡΠ΅ΡΡ, ΠΊΠ°ΠΊ Π½Π°ΡΡΡΠΎΠΈΡΡ
ΠΠ»Ρ ΠΏΠΎΡΡΡΠΎΠ΅Π½ΠΈΡ Π³ΡΠ°ΡΠΈΠΊΠ° Π½Π°Π±Π»ΡΠ΄Π΅Π½ΠΈΠΉ Π²Π²Π΅Π΄ΠΈΡΠ΅:
plot(x, y, pch = 19, col = "ΡΠ΅ΡΠ½ΡΠΉ")
plot(y ~ x, pch = 19, col = "black") # ΠΠΊΠ²ΠΈΠ²Π°Π»Π΅Π½Ρ
ΠΡΠΎΠΌΠ΅ ΡΠΎΠ³ΠΎ, Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡ ΡΡΠ½ΠΊΡΠΈΡ ΠΈΠ΄Π΅Π½ΡΠΈΡΠΈΠΊΠ°ΡΠΈΠΈ
, ΡΡΠΎΠ±Ρ Π²ΡΡΡΠ½ΡΡ ΠΏΠΎΠΌΠ΅ΡΠΈΡΡ Π½Π΅ΠΊΠΎΡΠΎΡΡΠ΅ ΡΠΎΡΠΊΠΈ Π΄Π°Π½Π½ΡΡ
Π³ΡΠ°ΡΠΈΠΊΠ° , Π½Π°ΠΏΡΠΈΠΌΠ΅Ρ, Π½Π΅ΠΊΠΎΡΠΎΡΡΠ΅ Π²ΡΠ±ΡΠΎΡΡ. Π Π°ΡΠ³ΡΠΌΠ΅Π½ΡΠ΅ labels
Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΡΠΊΠ°Π·Π°ΡΡ Π½ΡΠΆΠ½ΡΠ΅ ΠΌΠ΅ΡΠΊΠΈ Π΄Π»Ρ ΠΊΠ°ΠΆΠ΄ΠΎΠΉ ΡΠΎΡΠΊΠΈ.
Π ΡΡΠΎΠΌ ΠΏΡΠΈΠΌΠ΅ΡΠ΅ ΠΌΡ ΡΠΎΠ±ΠΈΡΠ°Π΅ΠΌΡΡ ΠΎΠΏΡΠ΅Π΄Π΅Π»ΠΈΡΡ ΠΊΠΎΠΎΡΠ΄ΠΈΠ½Π°ΡΡ Π²ΡΠ±ΡΠ°Π½Π½ΡΡ
ΡΠΎΡΠ΅ΠΊ. ΠΠΎΠ³Π΄Π° Π·Π°ΠΊΠΎΠ½ΡΠΈΡΠ΅, Π²Π°ΠΌ Π½ΡΠΆΠ½ΠΎ Π±ΡΠ΄Π΅Ρ Π½Π°ΠΆΠ°ΡΡ Esc . ΠΡΠ»ΠΈ Π²Π°ΠΌ Π½ΡΠΆΠ½ΠΎ Π½Π°ΠΉΡΠΈ Π΄ΠΎΠΏΠΎΠ»Π½ΠΈΡΠ΅Π»ΡΠ½ΡΠ΅ Π°ΡΠ³ΡΠΌΠ΅Π½ΡΡ ΠΈΠ»ΠΈ Π±ΠΎΠ»Π΅Π΅ ΠΏΠΎΠ΄ΡΠΎΠ±Π½ΡΠ΅ ΠΎΠ±ΡΡΡΠ½Π΅Π½ΠΈΡ ΡΡΠ½ΠΊΡΠΈΠΈ, Π²Π²Π΅Π΄ΠΈΡΠ΅ ?identify
Π² ΠΊΠΎΠΌΠ°Π½Π΄Π½ΠΎΠΉ ΠΊΠΎΠ½ΡΠΎΠ»ΠΈ.
ΠΎΠΏΡΠ΅Π΄Π΅Π»ΠΈΡΡ(y ~ x, labels = paste0("(", round(x, 2), ", ", round(y, 2), ")"))
Π’ΠΎΡΠ΅ΡΠ½Π°Ρ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° Π² R Ρ ΡΠ°Π·Π½ΡΠΌΠΈ ΡΠ²Π΅ΡΠ°ΠΌΠΈ
ΠΡΠ»ΠΈ Ρ Π²Π°Ρ Π΅ΡΡΡ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½Π°Ρ, ΠΊΠΎΡΠΎΡΠ°Ρ ΠΊΠ»Π°ΡΡΠΈΡΠΈΡΠΈΡΡΠ΅Ρ ΡΠΎΡΠΊΠΈ Π΄Π°Π½Π½ΡΡ
ΠΏΠΎ Π½Π΅ΠΊΠΎΡΠΎΡΡΠΌ Π³ΡΡΠΏΠΏΠ°ΠΌ, Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΡΡΡΠ°Π½ΠΎΠ²ΠΈΡΡ Π΅Π΅ Π² ΠΊΠ°ΡΠ΅ΡΡΠ²Π΅ ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠ° Π°ΡΠ³ΡΠΌΠ΅Π½ΡΠ° col
, ΡΡΠΎΠ±Ρ ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°ΡΡ ΡΠΎΡΠΊΠΈ Π΄Π°Π½Π½ΡΡ
ΡΠ°Π·Π½ΡΠΌΠΈ ΡΠ²Π΅ΡΠ°ΠΌΠΈ , Π² Π·Π°Π²ΠΈΡΠΈΠΌΠΎΡΡΠΈ ΠΎΡ Π΅Π³ΠΎ Π³ΡΡΠΏΠΏΡ, ΠΈΠ»ΠΈ Π΄Π°ΠΆΠ΅ ΡΡΡΠ°Π½ΠΎΠ²ΠΈΡΡ ΡΠ°Π·Π½ΡΠ΅ ΡΠΈΠΌΠ²ΠΎΠ»Ρ ΠΏΠΎ Π³ΡΡΠΏΠΏΠ°ΠΌ.
group <- as.factor(ifelse(x < 0,5, "ΠΡΡΠΏΠΏΠ° 1", "ΠΡΡΠΏΠΏΠ° 2"))
plot(x, y, pch = as.numeric(group), col = group)
Scatter Π³ΡΠ°ΡΠΈΠΊ Ρ Π»ΠΈΠ½ΠΈΠ΅ΠΉ ΡΠ΅Π³ΡΠ΅ΡΡΠΈΠΈ
ΠΠ°ΠΊ ΠΌΡ ΡΠΆΠ΅ Π³ΠΎΠ²ΠΎΡΠΈΠ»ΠΈ Π²ΠΎ Π²Π²Π΅Π΄Π΅Π½ΠΈΠΈ, ΠΎΡΠ½ΠΎΠ²Π½ΠΎΠ΅ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠ΅ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ Π² R β ΠΏΡΠΎΠ²Π΅ΡΠΊΠ° ΡΠ²ΡΠ·ΠΈ ΠΌΠ΅ΠΆΠ΄Ρ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΠΌΠΈ . ΠΠ»Ρ ΡΡΠΎΠ³ΠΎ Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ Π΄ΠΎΠ±Π°Π²ΠΈΡΡ Π»ΠΈΠ½ΠΈΠΈ ΡΠ΅Π³ΡΠ΅ΡΡΠΈΠΈ (ΠΈΠ»ΠΈ Π΄ΠΎΠ±Π°Π²ΠΈΡΡ ΠΊΡΠΈΠ²ΡΠ΅ Π² ΡΠ»ΡΡΠ°Π΅ Π½Π΅Π»ΠΈΠ½Π΅ΠΉΠ½ΡΡ ΠΎΡΠ΅Π½ΠΎΠΊ) Ρ 92, ΡΡΠΎΠ»Π±Π΅Ρ = "2", lwd = 3, lty = 2) # ΠΠΈΠ½Π΅ΠΉΠ½Π°Ρ ΠΏΠΎΠ΄Π³ΠΎΠ½ΠΊΠ° abline(lm(y ~ x), col = "ΠΎΡΠ°Π½ΠΆΠ΅Π²ΡΠΉ", lwd = 3) # ΠΠ»Π°Π΄ΠΊΠ°Ρ ΠΏΠΎΡΠ°Π΄ΠΊΠ° Π»ΠΈΠ½ΠΈΠΈ (lowess (x, y), col = "ΡΠΈΠ½ΠΈΠΉ", lwd = 3) # ΠΠ΅Π³Π΅Π½Π΄Π° legend("topleft", legend = c("Π’Π΅ΠΎΡΠ΅ΡΠΈΡΠ΅ΡΠΊΠ°Ρ", "ΠΠΈΠ½Π΅ΠΉΠ½Π°Ρ", "ΠΠ»Π°Π΄ΠΊΠ°Ρ"), lwd = 3, lty = c(2, 1, 1), col = c("ΠΊΡΠ°ΡΠ½ΡΠΉ", "ΠΎΡΠ°Π½ΠΆΠ΅Π²ΡΠΉ", "ΡΠΈΠ½ΠΈΠΉ"))
ΠΡΠΎΠΌΠ΅ ΡΠΎΠ³ΠΎ, Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ Π΄ΠΎΠ±Π°Π²ΠΈΡΡ ΠΊΠΎΡΡΠ΅Π»ΡΡΠΈΡ ΠΠΈΡΡΠΎΠ½Π° ΠΌΠ΅ΠΆΠ΄Ρ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΠΌΠΈ, ΠΊΠΎΡΠΎΡΡΡ Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ Π²ΡΡΠΈΡΠ»ΠΈΡΡ Ρ ΠΏΠΎΠΌΠΎΡΡΡ ΡΡΠ½ΠΊΡΠΈΡ ΡΠΎΠΎΡΠ²Π΅ΡΡΡΠ²ΡΠ΅Ρ ΡΡΠ½ΠΊΡΠΈΠΈ
. ΠΠ°ΡΠ΅ΠΌ Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΠΏΠΎΠΌΠ΅ΡΡΠΈΡΡ Π²ΡΠ²ΠΎΠ΄ Π² Π½Π΅ΠΊΠΎΡΠΎΡΡΠ΅ ΠΊΠΎΠΎΡΠ΄ΠΈΠ½Π°ΡΡ Π³ΡΠ°ΡΠΈΠΊΠ° Ρ ΠΏΠΎΠΌΠΎΡΡΡ
ΡΠ΅ΠΊΡΡ
ΡΡΠ½ΠΊΡΠΈΡ.
# Π Π°ΡΡΡΠΈΡΠ°ΡΡ ΠΊΠΎΡΡΠ΅Π»ΡΡΠΈΡ
ΠΡΠΏΡΠ°Π²ΠΈΡΡ <- ΠΊΠΎΡ (Ρ
, Ρ)
# Π‘ΠΎΠ·Π΄Π°ΠΉΡΠ΅ Π³ΡΠ°ΡΠΈΠΊ ΠΈ Π΄ΠΎΠ±Π°Π²ΡΡΠ΅ Π²ΡΡΠΈΡΠ»Π΅Π½Π½ΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅
Π³ΡΠ°ΡΠΈΠΊ (Ρ
, Ρ, pch = 19)
text(paste("Correlation:", round(Corr, 2)), x = 0,2, y = 4,5)
ΠΠΎΠ±Π°Π²ΠΈΡΡ Π½Π΅ΡΠΊΠΎΠ»ΡΠΊΠΎ ΡΡΠ΄ΠΎΠ² ΠΊ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ΅ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ R
ΠΡ ΡΠ°ΠΊΠΆΠ΅ ΠΌΠΎΠΆΠ΅ΡΠ΅ Π΄ΠΎΠ±Π°Π²ΠΈΡΡ Π±ΠΎΠ»ΡΡΠ΅ Π΄Π°Π½Π½ΡΡ
ΠΊ ΠΈΡΡ
ΠΎΠ΄Π½ΠΎΠΌΡ Π³ΡΠ°ΡΠΈΠΊΡ Ρ ΠΏΠΎΠΌΠΎΡΡΡ ΡΠΎΡΠ΅ΠΊ
ΡΡΠ½ΠΊΡΠΈΡ, ΠΊΠΎΡΠΎΡΠ°Ρ Π΄ΠΎΠ±Π°Π²ΠΈΡ Π½ΠΎΠ²ΡΠ΅ ΡΠΎΡΠΊΠΈ ΠΏΠΎΠ²Π΅ΡΡ
ΠΏΡΠ΅Π΄ΡΠ΄ΡΡΠ΅Π³ΠΎ Π³ΡΠ°ΡΠΈΠΊΠ°, ΡΠΎΠ±Π»ΡΠ΄Π°Ρ ΠΈΡΡ
ΠΎΠ΄Π½ΡΠΉ ΠΌΠ°ΡΡΡΠ°Π±.
Π½Π°Π±ΠΎΡ ΡΠ΅ΠΌΡΠ½(1)
# ΠΠΎΡΡΡΠΎΠΈΡΡ ΠΏΠ΅ΡΠ²ΡΡ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΡ
ΡΡΠΆΠ΅Ρ (Ρ
, Ρ, pch = 19)
# ΠΠΎΠ²Π°Ρ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½Π°Ρ
ΠΏ <- 200
x2 <- runif(n)
Ρ2 <- 2,5 + Ρ
2 + Π³Π½ΠΎΡΠΌ(ΠΏ, 0, 0,1)
# ΠΠΎΠ±Π°Π²Π»ΡΠ΅ΠΌ Π½ΠΎΠ²ΡΡ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΡ
points(x2, y2, col = "green", pch = 19)
Π’ΠΎΡΠ΅ΡΠ½Π°Ρ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° Ρ ΠΏΠ»Π°Π½ΠΊΠ°ΠΌΠΈ ΠΏΠΎΠ³ΡΠ΅ΡΠ½ΠΎΡΡΠ΅ΠΉ Π² R
ΠΠΎΠ±Π°Π²Π»Π΅Π½ΠΈΠ΅ ΠΏΠΎΠ³ΡΠ΅ΡΠ½ΠΎΡΡΠ΅ΠΉ Π½Π° ΡΠΎΡΠ΅ΡΠ½ΡΡ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ Π² R Π΄ΠΎΠ²ΠΎΠ»ΡΠ½ΠΎ ΠΏΡΠΎΡΡΠΎ. ΠΡΠ΅Π΄ΠΏΠΎΠ»ΠΎΠΆΠΈΠΌ, Ρ Π²Π°Ρ Π΅ΡΡΡ 10 Π³ΡΡΠΏΠΏ ΡΠΎ ΡΡΠ΅Π΄Π½ΠΈΠΌ ΠΏΠΎ ΠΠ°ΡΡΡΡ ΠΈ ΡΡΠ°Π½Π΄Π°ΡΡΠ½ΡΠΌ ΠΎΡΠΊΠ»ΠΎΠ½Π΅Π½ΠΈΠ΅ΠΌ ΠΏΠΎ ΠΠ°ΡΡΡΡ, ΠΊΠ°ΠΊ Π² ΡΠ»Π΅Π΄ΡΡΡΠ΅ΠΌ ΠΏΡΠΈΠΌΠ΅ΡΠ΅. ΠΡ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΠΏΠΎΡΡΡΠΎΠΈΡΡ Π΄Π°Π½Π½ΡΠ΅ ΠΈ ΡΠΊΠ°Π·Π°ΡΡ ΠΏΡΠ΅Π΄Π΅Π» ΠΎΡΠΈ Y ΠΊΠ°ΠΊ Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½ Π½ΠΈΠΆΠ½Π΅Π³ΠΎ ΠΈ Π²Π΅ΡΡ
Π½Π΅Π³ΠΎ ΡΡΠΎΠ»Π±ΡΠ°. ΠΠ°ΡΠ΅ΠΌ Π²Π°ΠΌ Π½ΡΠΆΠ½ΠΎ Π±ΡΠ΄Π΅Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡ
ΡΡΡΠ΅Π»ΠΊΠΈ
ΡΡΠ½ΠΊΡΠΈΠΎΠ½ΠΈΡΡΡΡ ΡΠ»Π΅Π΄ΡΡΡΠΈΠΌ ΠΎΠ±ΡΠ°Π·ΠΎΠΌ Π΄Π»Ρ ΡΠΎΠ·Π΄Π°Π½ΠΈΡ ΠΏΠ»Π°Π½ΠΎΠΊ ΠΏΠΎΠ³ΡΠ΅ΡΠ½ΠΎΡΡΠ΅ΠΉ.
ΠΌΠΎΠΈ_Π΄Π°Π½Π½ΡΠ΅ <- 1:10
Π‘ΡΠ΅Π΄Π½Π΅Π΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ <- rnorm(10)
Sd <- rn(10, 1, 0,1)
ΡΡΠΆΠ΅Ρ (my_data, ΡΡΠ΅Π΄Π½Π΅Π΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅,
ylim = Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½ (c (ΡΡΠ΅Π΄Π½Π΅Π΅ - Sd, ΡΡΠ΅Π΄Π½Π΅Π΅ + Sd)),
ΠΏΡ = 16)
# ΠΠ»Π°Π½ΠΊΠΈ ΠΎΡΠΈΠ±ΠΎΠΊ
ΡΡΡΠ΅Π»ΠΊΠΈ (x0 = ΠΌΠΎΠΈ_Π΄Π°Π½Π½ΡΠ΅, y0 = ΡΡΠ΅Π΄Π½Π΅Π΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ - Sd, x1 = ΠΌΠΎΠΈ_Π΄Π°Π½Π½ΡΠ΅, y1 = ΡΡΠ΅Π΄Π½Π΅Π΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ + Sd,
Π΄Π»ΠΈΠ½Π° = 0,15, ΠΊΠΎΠ΄ = 3, ΡΠ³ΠΎΠ» = 90)
Π‘Π²ΡΠ·Π½Π°Ρ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ Π² R
Π‘Π²ΡΠ·Π½Π°Ρ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ ΠΏΠΎΡ ΠΎΠΆΠ° Π½Π° Π»ΠΈΠ½Π΅ΠΉΠ½ΡΡ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ, Π½ΠΎ ΠΊΠΎΠ½ΡΡΠΎΠ»ΡΠ½ΡΡ ΡΠΎΡΠ΅ΠΊ ΠΎΡΠΌΠ΅ΡΠ΅Π½Ρ ΡΠΎΡΠΊΠ°ΠΌΠΈ ΠΈΠ»ΠΈ Π΄ΡΡΠ³ΠΈΠΌ ΡΠΈΠΌΠ²ΠΎΠ»ΠΎΠΌ. ΠΠ»Ρ ΡΡΠΎΠ³ΠΎ ΠΌΠΎΠΆΠ½ΠΎ ΡΡΡΠ°Π½ΠΎΠ²ΠΈΡΡ 91,05 + ΡΠ½ΠΎΡΠΌ(11) Π³ΡΠ°ΡΠΈΠΊ (x3, y3, type = "b", col = 2, lwd = 3, pch = 1) ΡΡΡΠΎΠΊΠΈ (x3, y4, type = "b", col = 3, lwd = 3, pch = 1) lines(x3, y5, type = "b", col = 4, lwd = 3, pch = 1)
ΠΠ»ΡΡΠ΅ΡΠ½Π°ΡΠΈΠ²ΠΎΠΉ ΡΠ²Π»ΡΠ΅ΡΡΡ ΡΠΎΠ΅Π΄ΠΈΠ½Π΅Π½ΠΈΠ΅ ΡΠΎΡΠ΅ΠΊ ΡΡΡΠ΅Π»ΠΊΠ°ΠΌΠΈ:
# Π€ΡΠ½ΠΊΡΠΈΡ Π΄Π»Ρ ΡΠΎΠ΅Π΄ΠΈΠ½Π΅Π½ΠΈΡ ΡΠΎΡΠ΅ΠΊ ΡΡΡΠ΅Π»ΠΊΠ°ΠΌΠΈ
arrowsPlot <- function(x, y, lwd = 1, col = 1, angle = 20, length = 0.
2) {
Π½Π΅Π²ΠΈΠ΄ΠΈΠΌΡΠΉ (ΡΠΎΡΠ½ΡΠΉ (1: Π΄Π»ΠΈΠ½Π° (x),
ΡΡΠ½ΠΊΡΠΈΡ (i) ΡΡΡΠ΅Π»ΠΊΠΈ (x[i], y[i], x[i + 1], y[i + 1], lwd = lwd,
col=col, angle=ΡΠ³ΠΎΠ», length=Π΄Π»ΠΈΠ½Π°)))
}
Π³ΡΠ°ΡΠΈΠΊ (x3, y3, col = 2, lwd = 3, pch = "")
arrowsPlot(x3, y3, col = 2, lwd = 3)
ΡΡΡΠΎΠΊΠΈ (x3, y4, ΡΡΠΎΠ»Π±Π΅Ρ = 3, lwd = 3)
arrowsPlot(x3, y4, col = 3, lwd = 3)
Π»ΠΈΠ½ΠΈΠΈ (x3, y5, ΡΡΠΎΠ»Π±Π΅Ρ = 4, lwd = 3)
arrowsPlot(x3, y5, col = 4, lwd = 3) 93, ΠΎΠ±.(Ρ3 + 5))
# Π‘ΠΎΠ·Π΄Π°Π΅ΠΌ ΠΏΠΎΠ΄ΠΊΠ»ΡΡΠ΅Π½Π½ΡΡ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ
Π³ΡΠ°ΡΠΈΠΊ (x4, y5, yaxt = "n", xaxt = "n", pch = "",
xlab = "ΠΠΎΠΏΡΠ»ΡΡΠ½ΠΎΡΡΡ", ylab = "ΠΡΠΎΠ΄Π°ΠΆΠΈ", xlim = c(-1, 5.5))
arrowsPlot(x4, y5, col = 3, lwd = 3)
# ΠΠΎΠ±Π°Π²Π»Π΅Π½ΠΈΠ΅ Π»Π΅Ρ ΠΊ ΠΊΠ°ΠΆΠ΄ΠΎΠΉ ΡΠΎΡΠΊΠ΅
text(x4 + 0.3, y5, 1970:1980)
ΠΠ»Π°Π΄ΠΊΠ°Ρ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ Ρ ΡΡΠ½ΠΊΡΠΈΠ΅ΠΉ smoothScatter
Π€ΡΠ½ΠΊΡΠΈΡ smoothScatter
β ΡΡΠΎ Π±Π°Π·ΠΎΠ²Π°Ρ ΡΡΠ½ΠΊΡΠΈΡ R, ΠΊΠΎΡΠΎΡΠ°Ρ ΡΠΎΠ·Π΄Π°Π΅Ρ ΡΠ³Π»Π°ΠΆΠ΅Π½Π½ΡΡ ΠΎΡΠ΅Π½ΠΊΡ ΠΏΠ»ΠΎΡΠ½ΠΎΡΡΠΈ ΡΠ΄ΡΠ° ΡΠ²Π΅ΡΠ° R-Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ.
Π ΡΠ»Π΅Π΄ΡΡΡΠΈΡ
ΠΏΡΠΈΠΌΠ΅ΡΠ°Ρ
ΠΏΠΎΠΊΠ°Π·Π°Π½ΠΎ, ΠΊΠ°ΠΊ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡ ΡΠ°ΠΌΡΠ΅ ΠΎΡΠ½ΠΎΠ²Π½ΡΠ΅ Π°ΡΠ³ΡΠΌΠ΅Π½ΡΡ ΡΡΠ½ΠΊΡΠΈΠΈ. ΠΠ±ΡΠ°ΡΠΈΡΠ΅ Π²Π½ΠΈΠΌΠ°Π½ΠΈΠ΅, ΡΡΠΎ, ΠΊΠ°ΠΊ ΠΈ Π² Π΄ΡΡΠ³ΠΈΡ
Π½Π΅ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠΈΡΠ΅ΡΠΊΠΈΡ
ΠΌΠ΅ΡΠΎΠ΄Π°Ρ
, Π²Π°ΠΌ Π½ΡΠΆΠ½ΠΎ Π±ΡΠ΄Π΅Ρ Π²ΡΠ±ΡΠ°ΡΡ ΠΏΠΎΠ»ΠΎΡΡ ΠΏΡΠΎΠΏΡΡΠΊΠ°Π½ΠΈΡ. Π₯ΠΎΡΡ ΡΡΠ½ΠΊΡΠΈΡ ΠΎΠ±Π΅ΡΠΏΠ΅ΡΠΈΠ²Π°Π΅Ρ ΠΏΡΠΎΠΏΡΡΠΊΠ½ΡΡ ΡΠΏΠΎΡΠΎΠ±Π½ΠΎΡΡΡ ΠΏΠΎ ΡΠΌΠΎΠ»ΡΠ°Π½ΠΈΡ, Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ Π½Π°ΡΡΡΠΎΠΈΡΡ Π΅Π΅ Ρ ΠΏΠΎΠΌΠΎΡΡΡ 90,4,
colramp = colorRampPalette(c("#000099", "#00FEFF", "#45FE4F",
"#FCFF00", "#FF9400", "#FF3100")))
ΠΠΎΠΆΠ½ΠΎ Π΄Π°ΠΆΠ΅ Π΄ΠΎΠ±Π°Π²ΠΈΡΡ ΠΊΠΎΠ½ΡΡΡ Ρ ΠΏΠΎΠΌΠΎΡΡΡ ΡΡΠ½ΠΊΡΠΈΠΈ ΠΊΠΎΠ½ΡΡΡ
.
# install.packages("ΠΠΠ‘Π‘Π")
Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠ° (ΠΠΠ‘Π‘)
ΠΊΠ΅ΡΠ½ <- kde2d(x, y)
ΠΊΠΎΠ½ΡΡΡ (kern, drawlabels = FALSE, nlevels = 6,
col = rev(heat.colors(6)), add = TRUE, lwd = 3)
Π€ΡΠ½ΠΊΡΠΈΡ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ Π² R
ΠΠ»ΡΡΠ΅ΡΠ½Π°ΡΠΈΠ²ΠΎΠΉ Π΄Π»Ρ ΡΠΎΠ·Π΄Π°Π½ΠΈΡ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ Π² R ΡΠ²Π»ΡΠ΅ΡΡΡ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠ΅ ΡΡΠ½ΠΊΡΠΈΠΈ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ
Π€ΡΠ½ΠΊΡΠΈΡ R ΠΈΠ· ΠΏΠ°ΠΊΠ΅ΡΠ° car
, ΠΊΠΎΡΠΎΡΠ°Ρ Π°Π²ΡΠΎΠΌΠ°ΡΠΈΡΠ΅ΡΠΊΠΈ ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°Π΅Ρ ΠΊΡΠΈΠ²ΡΠ΅ ΡΠ΅Π³ΡΠ΅ΡΡΠΈΠΈ ΠΈ ΠΏΠΎΠ·Π²ΠΎΠ»ΡΠ΅Ρ Π΄ΠΎΠ±Π°Π²Π»ΡΡΡ ΠΌΠ°ΡΠ³ΠΈΠ½Π°Π»ΡΠ½ΡΠ΅ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ Π² ΡΠΎΡΠ΅ΡΠ½ΡΡ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ.
# install.packages("car")
Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠ° (ΠΌΠ°ΡΠΈΠ½Π°)
Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ (Ρ ~ Ρ
)
scatterplot(x, y) # ΠΠΊΠ²ΠΈΠ²Π°Π»Π΅Π½Ρ
ΠΠΎ ΡΠΌΠΎΠ»ΡΠ°Π½ΠΈΡ ΡΡΠ½ΠΊΡΠΈΡ ΡΡΡΠΎΠΈΡ ΡΡΠΈ ΠΎΡΠ΅Π½ΠΊΠΈ (Π»ΠΈΠ½Π΅ΠΉΠ½ΠΎΠ΅ ΠΈ Π½Π΅ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠΈΡΠ΅ΡΠΊΠΎΠ΅ ΡΡΠ΅Π΄Π½Π΅Π΅ ΠΈ ΡΡΠ»ΠΎΠ²Π½ΡΡ Π΄ΠΈΡΠΏΠ΅ΡΡΠΈΡ) Ρ ΠΌΠ°ΡΠ³ΠΈΠ½Π°Π»ΡΠ½ΡΠΌΠΈ ΡΡΠΈΡΠΊΠΎΠ²ΡΠΌΠΈ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ°ΠΌΠΈ, ΠΈ Π²ΡΠ΅ ΠΎΠ½ΠΈ ΠΎΠ΄Π½ΠΎΠ³ΠΎ ΡΠ²Π΅ΡΠ°.
ΠΠ»Ρ ΡΠΎΠ³ΠΎ, ΡΡΠΎΠ±Ρ Π½Π°ΡΡΡΠΎΠΈΡΡ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ , Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡ Π°ΡΠ³ΡΠΌΠ΅Π½ΡΡ col
ΠΈ pch
Π΄Π»Ρ ΠΈΠ·ΠΌΠ΅Π½Π΅Π½ΠΈΡ ΡΠ²Π΅ΡΠ° ΠΈ ΡΠΈΠΌΠ²ΠΎΠ»Π° ΡΠΎΡΠ΅ΠΊ ΡΠΎΠΎΡΠ²Π΅ΡΡΡΠ²Π΅Π½Π½ΠΎ. ΠΡ ΡΠ°ΠΊΠΆΠ΅ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΠΏΠ΅ΡΠ΅Π΄Π°ΡΡ Π°ΡΠ³ΡΠΌΠ΅Π½ΡΡ Π² Π²ΠΈΠ΄Π΅ ΡΠΏΠΈΡΠΊΠ° Π°ΡΠ³ΡΠΌΠ΅Π½ΡΠ°ΠΌ regLine
ΠΈ smooth
, ΡΡΠΎΠ±Ρ Π½Π°ΡΡΡΠΎΠΈΡΡ Π³ΡΠ°ΡΠΈΡΠ΅ΡΠΊΠΈΠ΅ ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΡ ΡΠΎΠΎΡΠ²Π΅ΡΡΡΠ²ΡΡΡΠΈΡ
ΠΎΡΠ΅Π½ΠΎΠΊ.
Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ (Ρ
, Ρ,
col = 1, # ΠΠ·ΠΌΠ΅Π½ΠΈΡΡ ΡΠ²Π΅Ρ ΡΠΎΡΠ΅ΠΊ
pch = 15, # ΠΠ·ΠΌΠ΅Π½ΠΈΡΡ ΡΠΈΠΌΠ²ΠΎΠ»Ρ
regLine = list(col = "green", # Π¦Π²Π΅Ρ Π»ΠΈΠ½ΠΈΠΈ Π»ΠΈΠ½Π΅ΠΉΠ½ΠΎΠΉ ΡΠ΅Π³ΡΠ΅ΡΡΠΈΠΈ
lwd = 3), # Π’ΠΎΠ»ΡΠΈΠ½Π° Π»ΠΈΠ½ΠΈΠΈ Π»ΠΈΠ½Π΅ΠΉΠ½ΠΎΠΉ ΡΠ΅Π³ΡΠ΅ΡΡΠΈΠΈ
smooth = list(col.smooth = "red", # ΠΠ΅ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠΈΡΠ΅ΡΠΊΠΈΠΉ ΡΡΠ΅Π΄Π½ΠΈΠΉ ΡΠ²Π΅Ρ
col.spread = "blue")) # Π¦Π²Π΅Ρ Π½Π΅ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠΈΡΠ΅ΡΠΊΠΎΠΉ Π΄ΠΈΡΠΏΠ΅ΡΡΠΈΠΈ
ΠΡΠΎΠΌΠ΅ ΡΠΎΠ³ΠΎ, Π΅ΡΠ»ΠΈ Π²Ρ Ρ
ΠΎΡΠΈΡΠ΅ ΡΠ΄Π°Π»ΠΈΡΡ ΠΊΠ°ΠΊΡΡ-Π»ΠΈΠ±ΠΎ ΠΈΠ· ΠΎΡΠ΅Π½ΠΎΠΊ, ΡΡΡΠ°Π½ΠΎΠ²ΠΈΡΠ΅ ΡΠΎΠΎΡΠ²Π΅ΡΡΡΠ²ΡΡΡΠΈΠΉ Π°ΡΠ³ΡΠΌΠ΅Π½Ρ ΡΠ°Π²Π½ΡΠΌ FALSE
.
Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ (Ρ
, Ρ,
smooth = FALSE, # Π£Π΄Π°Π»ΡΠ΅Ρ Π³Π»Π°Π΄ΠΊΡΡ ΠΎΡΠ΅Π½ΠΊΡ
regLine = FALSE) # Π£Π΄Π°Π»ΡΠ΅Ρ Π»ΠΈΠ½Π΅ΠΉΠ½ΡΡ ΠΎΡΠ΅Π½ΠΊΡ
ΠΡ ΡΠ°ΠΊΠΆΠ΅ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΡΡΡΠ°Π½ΠΎΠ²ΠΈΡΡ ΡΠΎΠ»ΡΠΊΠΎ ΠΎΠ΄ΠΈΠ½ ΠΏΡΠ΅Π΄Π΅Π»ΡΠ½ΡΠΉ ΡΡΠΈΠΊ Ρ Π°ΡΠ³ΡΠΌΠ΅Π½ΡΠΎΠΌ boxplots
, ΠΊΠΎΡΠΎΡΡΠΉ ΠΏΠΎ ΡΠΌΠΎΠ»ΡΠ°Π½ΠΈΡ ΡΠ°Π²Π΅Π½ "xy"
. ΠΡΠ»ΠΈ Π²Ρ ΡΡΡΠ°Π½ΠΎΠ²ΠΈΡΠ΅ Π΅Π³ΠΎ Π½Π°
"x"
, Π±ΡΠ΄Π΅Ρ ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°ΡΡΡΡ ΡΠΎΠ»ΡΠΊΠΎ ΡΡΠΈΡΠΊΠΎΠ²Π°Ρ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° ΠΎΡΠΈ X. Π’ΠΎ ΠΆΠ΅ ΡΠ°ΠΌΠΎΠ΅ Π΄Π»Ρ ΠΎΡΠΈ Y, Π΅ΡΠ»ΠΈ Π²Ρ ΡΡΡΠ°Π½ΠΎΠ²ΠΈΡΠ΅ Π°ΡΠ³ΡΠΌΠ΅Π½Ρ ΡΠ°Π²Π½ΡΠΌ "Ρ"
. ΠΡΠ»ΠΈ Π²Π°ΠΌ Π½Π΅ Π½ΡΠΆΠ΅Π½ ΠΊΠΎΡΠΎΠ±ΠΎΡΠ½ΡΠΉ Π³ΡΠ°ΡΠΈΠΊ, ΡΡΡΠ°Π½ΠΎΠ²ΠΈΡΠ΅ Π΄Π»Ρ Π½Π΅Π³ΠΎ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ ""
.
Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ (Ρ
, Ρ,
boxplots = "x") # ΠΡΠ΅Π΄Π΅Π»ΡΠ½Π°Ρ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° Π΄Π»Ρ ΠΎΡΠΈ x
ΠΡΠ»ΠΈ Ρ Π²Π°Ρ Π΅ΡΡΡ Π³ΡΡΠΏΠΏΡ, ΠΊΠΎΡΠΎΡΡΠ΅ ΠΊΠ»Π°ΡΡΠΈΡΠΈΡΠΈΡΡΡΡ Π΄Π°Π½Π½ΡΠ΅, Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΡΠΎΠ·Π΄Π°ΡΡ ΠΎΡΠ΅Π½ΠΊΠΈ ΡΠ΅Π³ΡΠ΅ΡΡΠΈΠΈ Π΄Π»Ρ ΠΊΠ°ΠΆΠ΄ΠΎΠΉ Π³ΡΡΠΏΠΏΡ, Π½Π°Π±ΡΠ°Π²:
Scatterplot(y ~ x | group)
ΠΠ±ΡΠ°ΡΠΈΡΠ΅ Π²Π½ΠΈΠΌΠ°Π½ΠΈΠ΅, ΠΌΠΎΠΆΠ½ΠΎ ΠΎΡΠΊΠ»ΡΡΠΈΡΡ Π»Π΅Π³Π΅Π½Π΄Ρ, ΡΡΡΠ°Π½ΠΎΠ²ΠΈΠ² Π΄Π»Ρ Π°ΡΠ³ΡΠΌΠ΅Π½ΡΠ° Π»Π΅Π³Π΅Π½Π΄Ρ
Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ FALSE
.
ΠΡΠΎΠΌΠ΅ ΡΠΎΠ³ΠΎ, Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΠΎΡΠΊΠ»ΡΡΠΈΡΡ ΡΠ΅ΡΠΊΡ Π³ΡΠ°ΡΠΈΠΊΠ° ΠΈΠ»ΠΈ Π΄Π°ΠΆΠ΅ Π΄ΠΎΠ±Π°Π²ΠΈΡΡ ΡΠ»Π»ΠΈΠΏΡ Ρ ΠΏΠΎΠΌΠΎΡΡΡ ΡΠ΅ΡΠΊΠ°
ΠΈ ΡΠ»Π»ΠΈΠΏΡ
Π°ΡΠ³ΡΠΌΠ΅Π½ΡΡ ΡΠΎΠΎΡΠ²Π΅ΡΡΡΠ²Π΅Π½Π½ΠΎ.
Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ (Ρ
, Ρ,
boxplots = "", # ΠΡΠΊΠ»ΡΡΠΈΡΡ boxplots
grid = FALSE, # ΠΡΠΊΠ»ΡΡΠΈΡΡ ΡΠ΅ΡΠΊΡ Π³ΡΠ°ΡΠΈΠΊΠ°
ellipse = TRUE) # Π ΠΈΡΠΎΠ²Π°Π½ΠΈΠ΅ ΡΠ»Π»ΠΈΠΏΡΠΎΠ²
ΠΡΡΡ ΠΈ Π΄ΡΡΠ³ΠΈΠ΅ Π°ΡΠ³ΡΠΌΠ΅Π½ΡΡ, ΠΊΠΎΡΠΎΡΡΠ΅ Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ Π½Π°ΡΡΡΠΎΠΈΡΡ, ΡΠ°ΠΊ ΡΡΠΎ Π½Π΅ Π·Π°Π±ΡΠ΄ΡΡΠ΅ Π²Π²Π΅ΡΡΠΈ ?scatterplot
Π΄Π»Ρ ΠΏΠΎΠ»ΡΡΠ΅Π½ΠΈΡ Π΄ΠΎΠΏΠΎΠ»Π½ΠΈΡΠ΅Π»ΡΠ½ΡΡ
ΡΠ²Π΅Π΄Π΅Π½ΠΈΠΉ.
ΠΠ°ΡΡΠΈΡΠ° ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ Π² R
ΠΡΠΈ ΡΠ°Π±ΠΎΡΠ΅ Ρ Π½Π΅ΡΠΊΠΎΠ»ΡΠΊΠΈΠΌΠΈ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΠΌΠΈ ΠΎΠ±ΡΡΠ½ΠΎ ΡΡΡΠΎΡΡ Π½Π΅ΡΠΊΠΎΠ»ΡΠΊΠΎ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ Π² 9 ΠΌΠ°ΡΡΠΈΡΠ΅.0003 ΠΎΡΠΎΠ±ΡΠ°ΠΆΠ°Π΅Ρ ΠΊΠ°ΠΆΠ΄ΡΡ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΡ ΠΏΠΎ ΡΡΠ°Π²Π½Π΅Π½ΠΈΡ Ρ Π΄ΡΡΠ³ΠΈΠΌΠΈ , ΡΡΠΎΠ±Ρ Π²ΠΈΠ·ΡΠ°Π»ΠΈΠ·ΠΈΡΠΎΠ²Π°ΡΡ ΠΊΠΎΡΡΠ΅Π»ΡΡΠΈΡ ΠΌΠ΅ΠΆΠ΄Ρ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΠΌΠΈ. ΠΡ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΡΠΎΠ·Π΄Π°ΡΡ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ Π² R Ρ Π½Π΅ΡΠΊΠΎΠ»ΡΠΊΠΈΠΌΠΈ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΠΌΠΈ, ΠΈΠ·Π²Π΅ΡΡΠ½ΡΡ ΠΊΠ°ΠΊ ΠΏΠΎΠΏΠ°ΡΠ½Π°Ρ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ ΠΈΠ»ΠΈ ΠΌΠ°ΡΡΠΈΡΠ° Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ ΡΠ°ΡΡΠ΅ΡΠ½ΠΈΡ, Ρ ΠΏΠΎΠΌΠΎΡΡΡ ΡΡΠ½ΠΊΡΠΈΠΈ ΠΏΠ°Ρ
.
ΠΏΠ°ΡΡ (~disp + wt + mpg + hp, data = mtcars)
ΠΡΠΎΠΌΠ΅ ΡΠΎΠ³ΠΎ, Π΅ΡΠ»ΠΈ Π²Π°Ρ Π½Π°Π±ΠΎΡ Π΄Π°Π½Π½ΡΡ
ΡΠΎΠ΄Π΅ΡΠΆΠΈΡ ΡΠ°ΠΊΡΠΎΡΠ½ΡΡ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΡ, Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΡΠΊΠ°Π·Π°ΡΡ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΡ Π² Π°ΡΠ³ΡΠΌΠ΅Π½ΡΠ΅ col
ΡΠ»Π΅Π΄ΡΡΡΠΈΠΌ ΠΎΠ±ΡΠ°Π·ΠΎΠΌ, ΡΡΠΎΠ±Ρ ΠΏΠΎΡΡΡΠΎΠΈΡΡ Π³ΡΡΠΏΠΏΡ Ρ ΡΠ°Π·Π½ΡΠΌΠΈ ΡΠ²Π΅Ρ.
ΠΏΠ°ΡΡ(~disp + wt + mpg + hp, col = factor(mtcars$am), pch = 19, data = mtcars)
ΠΠ»ΡΡΠ΅ΡΠ½Π°ΡΠΈΠ²ΠΎΠΉ ΡΠ²Π»ΡΠ΅ΡΡΡ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠ΅ ΡΡΠ½ΠΊΡΠΈΠΈ scatterplotMatrix
ΠΏΠ°ΠΊΠ΅ΡΠ° car
, ΠΊΠΎΡΠΎΡΡΠΉ Π΄ΠΎΠ±Π°Π²Π»ΡΠ΅Ρ ΠΎΡΠ΅Π½ΠΊΠΈ ΠΏΠ»ΠΎΡΠ½ΠΎΡΡΠΈ ΡΠ΄ΡΠ° ΠΏΠΎ Π΄ΠΈΠ°Π³ΠΎΠ½Π°Π»ΠΈ.
install.packages("Π°Π²ΡΠΎΠΌΠΎΠ±ΠΈΠ»Ρ")
Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠ° (ΠΌΠ°ΡΠΈΠ½Π°)
scatterplotMatrix(~ disp + wt + mpg + hp, data = mtcars)
ΠΡ ΠΌΠΎΠΆΠ΅ΡΠ΅ Π½Π°ΡΡΡΠΎΠΈΡΡ ΡΠ²Π΅ΡΠ° ΠΏΡΠ΅Π΄ΡΠ΄ΡΡΠ΅Π³ΠΎ Π³ΡΠ°ΡΠΈΠΊΠ° Ρ ΡΠΎΠΎΡΠ²Π΅ΡΡΡΠ²ΡΡΡΠΈΠΌΠΈ Π°ΡΠ³ΡΠΌΠ΅Π½ΡΠ°ΠΌΠΈ:
scatterplotMatrix(~ disp + wt + mpg + hp, data = mtcars,
Π΄ΠΈΠ°Π³ΠΎΠ½Π°Π»Ρ = ΠΠΠΠ¬, # Π£Π΄Π°Π»ΠΈΡΡ ΠΎΡΠ΅Π½ΠΊΠΈ ΠΏΠ»ΠΎΡΠ½ΠΎΡΡΠΈ ΡΠ΄ΡΠ°
regLine = list(col = "green", # Π¦Π²Π΅Ρ Π»ΠΈΠ½ΠΈΠΈ Π»ΠΈΠ½Π΅ΠΉΠ½ΠΎΠΉ ΡΠ΅Π³ΡΠ΅ΡΡΠΈΠΈ
lwd = 3), # Π’ΠΎΠ»ΡΠΈΠ½Π° Π»ΠΈΠ½ΠΈΠΈ Π»ΠΈΠ½Π΅ΠΉΠ½ΠΎΠΉ ΡΠ΅Π³ΡΠ΅ΡΡΠΈΠΈ
smooth = list(col.smooth = "red", # ΠΠ΅ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠΈΡΠ΅ΡΠΊΠΈΠΉ ΡΡΠ΅Π΄Π½ΠΈΠΉ ΡΠ²Π΅Ρ
col.spread = "blue")) # Π¦Π²Π΅Ρ Π½Π΅ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠΈΡΠ΅ΡΠΊΠΎΠΉ Π΄ΠΈΡΠΏΠ΅ΡΡΠΈΠΈ
ΠΡΡΠ³ΠΎΠΉ Π°Π»ΡΡΠ΅ΡΠ½Π°ΡΠΈΠ²ΠΎΠΉ ΡΠ²Π»ΡΠ΅ΡΡΡ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠ΅ ΡΡΠ½ΠΊΡΠΈΠΈ cpairs
ΠΏΠ°ΠΊΠ΅ΡΠ° gclus
.
# install.packages("gclus")
Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠ° (gclus)
data <- mtcars[c(1, 3, 5, 6)] # ΠΠ΅ΠΊΠΎΡΠΎΡΡΠ΅ ΡΠΈΡΠ»ΠΎΠ²ΡΠ΅ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΠ΅
# cpairs(data) # Π°Π»ΡΡΠ΅ΡΠ½Π°ΡΠΈΠ²Π° pairs()
corr <- abs(cor(data)) # ΠΠΎΡΡΠ΅Π»ΡΡΠΈΡ ΠΏΠΎ ΠΌΠΎΠ΄ΡΠ»Ρ
ΠΊΠΎΡΡ
ΡΠ²Π΅ΡΠ° <- dmat.
color(corr)
Π·Π°ΠΊΠ°Π· <- Π·Π°ΠΊΠ°Π·.ΡΠΈΠ½Π³Π» (ΠΊΠΎΡΡ.)
cpairs(data, order, panel.colors = colors, gap = 0.5,
main = "ΠΡΡΠΎΡΡΠΈΡΠΎΠ²Π°Π½Π½ΡΠ΅ ΠΈ ΠΎΠΊΡΠ°ΡΠ΅Π½Π½ΡΠ΅ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΠ΅ ΠΏΠΎ ΠΊΠΎΡΡΠ΅Π»ΡΡΠΈΠΈ")
Π’ΠΎΡΠ΅ΡΠ½Π°Ρ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΠ° Π² ggplot2
Π‘ΠΎΠ·Π΄Π°Π½ΠΈΠ΅ ΡΠΎΡΠ΅ΡΠ½ΠΎΠΉ Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌΡ Ρ ΠΏΠΎΠΌΠΎΡΡΡ Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠΈ ggplot2
ΠΌΠΎΠΆΠ΅Ρ Π±ΡΡΡ Π΄ΠΎΡΡΠΈΠ³Π½ΡΡΠΎ Ρ ΠΏΠΎΠΌΠΎΡΡΡ ΡΡΠ½ΠΊΡΠΈΠΈ geom_point
, ΠΈ Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΡΠ°Π·Π΄Π΅Π»ΠΈΡΡ Π³ΡΡΠΏΠΏΡ ΠΏΠΎ ΡΠ²Π΅ΡΡ, ΠΏΠ΅ΡΠ΅Π΄Π°Π² ΡΡΠ½ΠΊΡΠΈΡ aes
Ρ Π³ΡΡΠΏΠΏΠΎΠΉ Π² ΠΊΠ°ΡΠ΅ΡΡΠ²Π΅ ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠ° ΡΠ²Π΅ΡΠ°
Π°ΡΠ³ΡΠΌΠ΅Π½Ρ.
# install.packages("ggplot2")
Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠ° (ggplot2)
my_df <- data.frame(x = x, y = y, group = group)
ggplot (my_df, aes (Ρ
= Ρ
, Ρ = Ρ)) +
geom_point(aes(color = group)) + # Π’ΠΎΡΠΊΠΈ ΠΈ ΡΠ²Π΅Ρ ΠΏΠΎ Π³ΡΡΠΏΠΏΠ΅
scale_color_discrete("ΠΡΡΠΏΠΏΡ") + # ΠΠ·ΠΌΠ΅Π½ΠΈΡΡ Π·Π°Π³ΠΎΠ»ΠΎΠ²ΠΎΠΊ Π»Π΅Π³Π΅Π½Π΄Ρ
xlab("ΠΠ΅ΡΠ΅ΠΌΠ΅Π½Π½Π°Ρ X") + # ΠΠ΅ΡΠΊΠ° ΠΎΡΠΈ X
ylab("ΠΠ΅ΡΠ΅ΠΌΠ΅Π½Π½Π°Ρ Y") + # ΠΠ΅ΡΠΊΠ° ΠΎΡΠΈ Y
theme(axis.line = element_line(color = "black", # ΠΠ·ΠΌΠ΅Π½ΡΠ΅Ρ ΡΠ΅ΠΌΡ ΠΏΠΎ ΡΠΌΠΎΠ»ΡΠ°Π½ΠΈΡ
ΡΠ°Π·ΠΌΠ΅Ρ = 0,24))
3D R scatterplot
Π‘ Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠ°ΠΌΠΈ scatterplot3d
ΠΈ rgl
Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΡΠΎΠ·Π΄Π°ΡΡ 3D ΡΠΎΡΠ΅ΡΠ½ΡΡ
Π΄ΠΈΠ°Π³ΡΠ°ΠΌΠΌ Π² R .