Π§ΠΈΡ‚Π°ΠΉΡ‚Π΅ ΠΊΠ½ΠΈΠ³ΠΈ ΠΎΠ½Π»Π°ΠΉΠ½ Π½Π° Bookidrom.ru! БСсплатныС ΠΊΠ½ΠΈΠ³ΠΈ Π² ΠΎΠ΄Π½ΠΎΠΌ ΠΊΠ»ΠΈΠΊΠ΅

Π§ΠΈΡ‚Π°Ρ‚ΡŒ ΠΎΠ½Π»Π°ΠΉΠ½ Β«Maple 9.5/10 Π² ΠΌΠ°Ρ‚Π΅ΠΌΠ°Ρ‚ΠΈΠΊΠ΅, Ρ„ΠΈΠ·ΠΈΠΊΠ΅ ΠΈ ΠΎΠ±Ρ€Π°Π·ΠΎΠ²Π°Π½ΠΈΠΈΒ». Π‘Ρ‚Ρ€Π°Π½ΠΈΡ†Π° 59

Автор Π’Π»Π°Π΄ΠΈΠΌΠΈΡ€ Π”ΡŒΡΠΊΠΎΠ½ΠΎΠ²

5.2. Π Π°Π±ΠΎΡ‚Π° с функциями ΠΈΠ· ΠΎΡ‚Π΄Π΅Π»ΡŒΠ½Ρ‹Ρ… кусков

5.2.1. Π‘ΠΎΠ·Π΄Π°Π½ΠΈΠ΅ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ ΠΈΠ· ΠΎΡ‚Π΄Π΅Π»ΡŒΠ½Ρ‹Ρ… кусков

Для создания Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ, составлСнных ΠΈΠ· ΠΎΡ‚Π΄Π΅Π»ΡŒΠ½Ρ‹Ρ… кусков β€” кусочных Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ, Maple 9.5 располагаСт интСрСсной ΠΈ ΠΏΠΎ своСму ΡƒΠ½ΠΈΠΊΠ°Π»ΡŒΠ½ΠΎΠΉ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠ΅ΠΉ:

piecewise(cond_1,f_1, cond_2,f_2, ..., cond_n,f_n, f_otherwise)

Π³Π΄Π΅ f_i β€” Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅, cond_i β€” логичСскоС Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅, f_otherwise β€” Π½Π΅ΠΎΠ±ΡΠ·Π°Ρ‚Π΅Π»ΡŒΠ½ΠΎΠ΅ Π΄ΠΎΠΏΠΎΠ»Π½ΠΈΡ‚Π΅Π»ΡŒΠ½ΠΎΠ΅ Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅. Π’ зависимости ΠΎΡ‚ Ρ‚ΠΎΠ³ΠΎ ΠΈΠ»ΠΈ ΠΈΠ½ΠΎΠ³ΠΎ условия эта функция позволяСт Ρ„ΠΎΡ€ΠΌΠΈΡ€ΠΎΠ²Π°Ρ‚ΡŒ ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΡƒΡŽΡ‰ΡƒΡŽ Π°Π½Π°Π»ΠΈΡ‚ΠΈΡ‡Π΅ΡΠΊΡƒΡŽ Π·Π°Π²ΠΈΡΠΈΠΌΠΎΡΡ‚ΡŒ. К кусочным функциям (подчас Π² скрытой Ρ„ΠΎΡ€ΠΌΠ΅) приводят Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ с элСмСнтами сравнСния Π°Ρ€Π³ΡƒΠΌΠ΅Π½Ρ‚Π°, Π½Π°ΠΏΡ€ΠΈΠΌΠ΅Ρ€ abs, signum, max ΠΈ Π΄Ρ€. ΠŸΠΎΡΡ‚ΠΎΠΌΡƒ Π² Maple 8 Π²Π²Π΅Π΄Π΅Π½ достаточно ΠΌΠΎΡ‰Π½Ρ‹ΠΉ Π°ΠΏΠΏΠ°Ρ€Π°Ρ‚ ΠΎΠ±Ρ€Π°Π±ΠΎΡ‚ΠΊΠΈ ΠΈ ΠΏΡ€Π΅ΠΎΠ±Ρ€Π°Π·ΠΎΠ²Π°Π½ΠΈΠΉ Ρ‚Π°ΠΊΠΈΡ… Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ ΠΏΠΎ частям.

5.2.2. ΠŸΡ€ΠΎΡΡ‚Ρ‹Π΅ ΠΏΡ€ΠΈΠΌΠ΅Ρ€Ρ‹ примСнСния Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ piecewise

Рис. 5.5 ΠΏΠΎΠΊΠ°Π·Ρ‹Π²Π°Π΅Ρ‚ Π·Π°Π΄Π°Π½ΠΈΠ΅ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ f(Ρ…), содСрТащСй Ρ‚Ρ€ΠΈ Ρ…Π°Ρ€Π°ΠΊΡ‚Π΅Ρ€Π½Ρ‹Ρ… участка. По ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½Π½ΠΎΠΉ Ρ‡Π΅Ρ€Π΅Π· Ρ„ΡƒΠ½ΠΊΡ†ΠΈΡŽ ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»Ρ зависимости f(Ρ…) ΠΌΠΎΠΆΠ½ΠΎ, ΠΊΠ°ΠΊ ΠΎΠ±Ρ‹Ρ‡Π½ΠΎ, ΠΏΠΎΡΡ‚Ρ€ΠΎΠΈΡ‚ΡŒ Π΅Π΅ Π³Ρ€Π°Ρ„ΠΈΠΊ.

Рис. 5.5. ΠŸΡ€ΠΈΠΌΠ΅Ρ€ задания ΠΈ примСнСния Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ, составлСнной ΠΈΠ· ΠΎΡ‚Π΄Π΅Π»ΡŒΠ½Ρ‹Ρ… кусков


Π’Π°ΠΆΠ½ΠΎ ΠΎΡ‚ΠΌΠ΅Ρ‚ΠΈΡ‚ΡŒ, Ρ‡Ρ‚ΠΎ созданная с ΠΏΠΎΠΌΠΎΡ‰ΡŒΡŽ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ piecewise Π·Π°Π²ΠΈΡΠΈΠΌΠΎΡΡ‚ΡŒ ΠΌΠΎΠΆΠ΅Ρ‚ ΡƒΡ‡Π°ΡΡ‚Π²ΠΎΠ²Π°Ρ‚ΡŒ Π² Ρ€Π°Π·Π»ΠΈΡ‡Π½Ρ‹Ρ… прСобразованиях. НапримСр, Π½Π° рис. 5.3 ΠΏΠΎΠΊΠ°Π·Π°Π½ΠΎ, Ρ‡Ρ‚ΠΎ ΠΎΠ½Π° Π»Π΅Π³ΠΊΠΎ диффСрСнцируСтся ΠΈ интСгрируСтся, Ρ‚Π°ΠΊ Ρ‡Ρ‚ΠΎ ΠΌΠΎΠΆΠ½ΠΎ ΠΏΠΎΡΡ‚Ρ€ΠΎΠΈΡ‚ΡŒ Π³Ρ€Π°Ρ„ΠΈΠΊΠΈ ΠΏΡ€ΠΎΠΈΠ·Π²ΠΎΠ΄Π½ΠΎΠΉ этой Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ ΠΈ Π΅Π΅ ΠΈΠ½Ρ‚Π΅Π³Ρ€Π°Π»ΡŒΠ½ΠΎΠ³ΠΎ значСния. ΠŸΡ€ΠΈ этом каТдая Ρ‡Π°ΡΡ‚ΡŒ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ обрабатываСтся ΠΎΡ‚Π΄Π΅Π»ΡŒΠ½ΠΎ.

5.2.3. Π Π°Π±ΠΎΡ‚Π° с функциями piecewise

Π‘ функциями Ρ‚ΠΈΠΏΠ° piecewise ΠΌΠΎΠΆΠ½ΠΎ Ρ€Π°Π±ΠΎΡ‚Π°Ρ‚ΡŒ ΠΊΠ°ΠΊ с ΠΎΠ±Ρ‹Ρ‡Π½Ρ‹ΠΌΠΈ функциями. ΠŸΡ€ΠΈ этом Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΡ‹Π΅ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ ΠΈ прСобразования ΠΎΡΡƒΡ‰Π΅ΡΡ‚Π²Π»ΡΡŽΡ‚ΡΡ для ΠΊΠ°ΠΆΠ΄ΠΎΠΉ ΠΈΠ· частСй Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ ΠΈ Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°ΡŽΡ‚ΡΡ Π² наглядной Ρ„ΠΎΡ€ΠΌΠ΅.

НиТС ΠΏΡ€ΠΈΠ²Π΅Π΄Π΅Π½ ΠΏΡ€ΠΈΠΌΠ΅Ρ€ задания Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ f Π² аналитичСской Ρ„ΠΎΡ€ΠΌΠ΅ (Ρ„Π°ΠΉΠ» piecewi):

> restart;

> f := max(Ρ…^2 - 2, x-1);

f := max(xΒ²-2, x-1)

Для выявлСния Ρ…Π°Ρ€Π°ΠΊΡ‚Π΅Ρ€Π° Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ Π²ΠΎΡΠΏΠΎΠ»ΡŒΠ·ΡƒΠ΅ΠΌΡΡ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠ΅ΠΉ convert ΠΈ создадим ΠΎΠ±ΡŠΠ΅ΠΊΡ‚ g Π² Π²ΠΈΠ΄Π΅ кусочной Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ:

> g := convert(f, piecewise);

Π’Ρ‹ΠΏΠΎΠ»Π½ΠΈΠΌ Π΄ΠΈΡ„Ρ„Π΅Ρ€Π΅Π½Ρ†ΠΈΡ€ΠΎΠ²Π°Π½ΠΈΠ΅ ΠΈ ΠΈΠ½Ρ‚Π΅Π³Ρ€ΠΈΡ€ΠΎΠ²Π°Π½ΠΈΠ΅ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ:

> fprime := diff(f, Ρ…);

> Int(g,Ρ…)=int(g,Ρ…);

Как Π½Π΅Ρ‚Ρ€ΡƒΠ΄Π½ΠΎ Π·Π°ΠΌΠ΅Ρ‚ΠΈΡ‚ΡŒ, Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚Ρ‹ ΠΏΠΎΠ»ΡƒΡ‡Π΅Π½Ρ‹ Ρ‚Π°ΠΊΠΆΠ΅ Π² Π²ΠΈΠ΄Π΅ кусочных Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ. МоТно ΠΏΡ€ΠΎΠ΄ΠΎΠ»ΠΆΠΈΡ‚ΡŒ Ρ€Π°Π±ΠΎΡ‚Ρƒ с Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠ΅ΠΉ f ΠΈ Π²Ρ‹ΠΏΠΎΠ»Π½ΠΈΡ‚ΡŒ Π΅Π΅ Ρ€Π°Π·Π»ΠΎΠΆΠ΅Π½ΠΈΠ΅ Π² стСпСнной ряд:

> series(f, Ρ…);

-1+x+O(x6)

Π§Ρ‚ΠΎΠ±Ρ‹ ΡƒΠ±Ρ€Π°Ρ‚ΡŒ Ρ‡Π»Π΅Π½ с остаточной ΠΏΠΎΠ³Ρ€Π΅ΡˆΠ½ΠΎΡΡ‚ΡŒΡŽ, ΠΌΠΎΠΆΠ½ΠΎ Π²Ρ‹ΠΏΠΎΠ»Π½ΠΈΡ‚ΡŒ эту ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΡŽ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΌ ΠΎΠ±Ρ€Π°Π·ΠΎΠΌ:

> series(g, Ρ…);

-1+Ρ…

ΠžΠ±Ρ€Π°Ρ‚ΠΈΡ‚Π΅ Π²Π½ΠΈΠΌΠ°Π½ΠΈΠ΅ Π½Π° Ρ‚ΠΎ, Ρ‡Ρ‚ΠΎ ΠΏΠΎΡΠΊΠΎΠ»ΡŒΠΊΡƒ Ρ€Π°Π·Π»ΠΎΠΆΠ΅Π½ΠΈΠ΅ Π² ряд ищСтся (ΠΏΠΎ ΡƒΠΌΠΎΠ»Ρ‡Π°Π½ΠΈΡŽ) Π² окрСстности Ρ‚ΠΎΡ‡ΠΊΠΈ Ρ…=0, Ρ‚ΠΎ ΠΏΡ€ΠΈ этом ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΡƒΠ΅Ρ‚ΡΡ Ρ‚ΠΎΠ»ΡŒΠΊΠΎ Ρ‚ΠΎΡ‚ кусок Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ, Π² ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠΌ располоТСна эта Ρ‚ΠΎΡ‡ΠΊΠ°.

5.3. ΠžΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ с ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ°ΠΌΠΈ

5.3.1. ΠžΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½ΠΈΠ΅ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠΎΠ²

К числу Π½Π°ΠΈΠ±ΠΎΠ»Π΅Π΅ извСстных ΠΈ ΠΈΠ·ΡƒΡ‡Π΅Π½Π½Ρ‹Ρ… аналитичСских Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ относятся стСпСнныС ΠΌΠ½ΠΎΠ³ΠΎΡ‡Π»Π΅Π½Ρ‹ β€” ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΡ‹. Π“Ρ€Π°Ρ„ΠΈΠΊΠΈ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠΎΠ² ΠΎΠΏΠΈΡΡ‹Π²Π°ΡŽΡ‚ ΠΎΠ³Ρ€ΠΎΠΌΠ½ΠΎΠ΅ Ρ€Π°Π·Π½ΠΎΠΎΠ±Ρ€Π°Π·ΠΈΠ΅ ΠΊΡ€ΠΈΠ²Ρ‹Ρ… Π½Π° плоскости. ΠšΡ€ΠΎΠΌΠ΅ Ρ‚ΠΎΠ³ΠΎ, Π²ΠΎΠ·ΠΌΠΎΠΆΠ½Ρ‹ Ρ€Π°Ρ†ΠΈΠΎΠ½Π°Π»ΡŒΠ½Ρ‹Π΅ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠΈΠ°Π»ΡŒΠ½Ρ‹Π΅ выраТСния Π² Π²ΠΈΠ΄Π΅ ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΡ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠΎΠ². Π’Π°ΠΊΠΈΠΌ ΠΎΠ±Ρ€Π°Π·ΠΎΠΌ, ΠΊΡ€ΡƒΠ³ ΠΎΠ±ΡŠΠ΅ΠΊΡ‚ΠΎΠ², ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Π΅ ΠΌΠΎΠ³ΡƒΡ‚ Π±Ρ‹Ρ‚ΡŒ прСдставлСны ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ°ΠΌΠΈ, достаточно ΠΎΠ±ΡˆΠΈΡ€Π΅Π½, ΠΈ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠΈΠ°Π»ΡŒΠ½Ρ‹Π΅ прСобразования ΡˆΠΈΡ€ΠΎΠΊΠΎ ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΡƒΡŽΡ‚ΡΡ Π½Π° ΠΏΡ€Π°ΠΊΡ‚ΠΈΠΊΠ΅, Π² частности, для ΠΏΡ€ΠΈΠ±Π»ΠΈΠΆΠ΅Π½Π½ΠΎΠ³ΠΎ прСдставлСния Π΄Ρ€ΡƒΠ³ΠΈΡ… Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ.

Под ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠΎΠΌ Π² БКМ сумма Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠΉ с Ρ†Π΅Π»Ρ‹ΠΌΠΈ стСпСнями. ΠœΠ½ΠΎΠ³ΠΎΡ‡Π»Π΅Π½ для ряда ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ… β€” ΠΌΠ½ΠΎΠ³ΠΎΠΌΠ΅Ρ€Π½Ρ‹ΠΉ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌ. К ΠΎΠ΄Π½ΠΎΠΌΠ΅Ρ€Π½Ρ‹ΠΌ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ°ΠΌ относятся стСпСнной ΠΌΠ½ΠΎΠ³ΠΎΡ‡Π»Π΅Π½

Ρ€(Ρ…) = Π°n Ρ…n + Π°n-1 xn-1 + ... a1 x + Π°0,

Π° Ρ‚Π°ΠΊΠΆΠ΅ ΠΎΡ‚Π΄Π΅Π»ΡŒΠ½Π°Ρ пСрСмСнная Ρ… ΠΈ константа. Π‘ΠΎΠ»ΡŒΡˆΠΎΠ΅ достоинство ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠΎΠ² состоит Π² Ρ‚ΠΎΠΌ, Ρ‡Ρ‚ΠΎ ΠΎΠ½ΠΈ Π΄Π°ΡŽΡ‚ Π΅Π΄ΠΈΠ½ΠΎΠΎΠ±Ρ€Π°Π·Π½ΠΎΠ΅ прСдставлСниС ΠΌΠ½ΠΎΠ³ΠΈΡ… зависимостСй ΠΈ для своСго вычислСния Ρ‚Ρ€Π΅Π±ΡƒΡŽΡ‚ Ρ‚ΠΎΠ»ΡŒΠΊΠΎ арифмСтичСских ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΉ (ΠΈΡ… число Π·Π½Π°Ρ‡ΠΈΡ‚Π΅Π»ΡŒΠ½ΠΎ сокращаСтся ΠΏΡ€ΠΈ использовании Ρ…ΠΎΡ€ΠΎΡˆΠΎ извСстной схСмы Π“ΠΎΡ€Π½Π΅Ρ€Π°). ΠŸΡ€ΠΎΠΈΠ·Π²ΠΎΠ΄Π½Ρ‹Π΅ ΠΎΡ‚ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠΎΠ² ΠΈ ΠΈΠ½Ρ‚Π΅Π³Ρ€Π°Π»Ρ‹ с ΠΏΠΎΠ΄Ρ‹Π½Ρ‚Π΅Π³Ρ€Π°Π»ΡŒΠ½Ρ‹ΠΌΠΈ функциями-ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ°ΠΌΠΈ Π»Π΅Π³ΠΊΠΎ Π²Ρ‹Ρ‡ΠΈΡΠ»ΡΡŽΡ‚ΡΡ ΠΈ ΠΈΠΌΠ΅ΡŽΡ‚ простой Π²ΠΈΠ΄. Π•ΡΡ‚ΡŒ ΠΈ достаточно простыС Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΡ‹ для вычислСния всСх (Π² Ρ‚ΠΎΠΌ числС комплСксных) ΠΊΠΎΡ€Π½Π΅ΠΉ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠΎΠ² Π½Π° Π·Π°Π΄Π°Π½Π½ΠΎΠΌ ΠΏΡ€ΠΎΠΌΠ΅ΠΆΡƒΡ‚ΠΊΠ΅.

5.3.2. Π’Ρ‹Π΄Π΅Π»Π΅Π½ΠΈΠ΅ коэффициСнтов ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠΎΠ²

Для выдСлСния коэффициСнтов ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠΎΠ² Π² Maple слуТат ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠ΅ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ:

coeff(p, Ρ…) β€” Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ коэффициСнт ΠΏΡ€ΠΈ Ρ… ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ° p;

coeff(p, x, n) β€” Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ коэффициСнт для Ρ‡Π»Π΅Π½Π° со ΡΡ‚Π΅ΠΏΠ΅Π½ΡŒΡŽ n ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ° p;

coeff(p, x^n) β€” Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ коэффициСнты ΠΏΡ€ΠΈ x^n ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ° p;

coeffs(p, Ρ…, 't') β€” Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ коэффициСнты ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ° Π½Π΅ΡΠΊΠΎΠ»ΡŒΠΊΠΈΡ… ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ…, относящиСся ΠΊ ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ x (ΠΈΠ»ΠΈ списку ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ…) с ΠΎΠΏΡ†ΠΈΠ΅ΠΉ 't', Π·Π°Π΄Π°ΡŽΡ‰Π΅ΠΉ имя ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ;

collect(p, x) β€” Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌ, объСдиняя коэффициСнты ΠΏΡ€ΠΈ стСпСнях ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ Ρ….

НиТС Π΄Π°Π½Ρ‹ ΠΏΡ€ΠΈΠΌΠ΅Ρ€Ρ‹ примСнСния этих Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ (Ρ„Π°ΠΉΠ» coefcoll):

> Ρ€:=Π°4*Ρ…^4+Π°3*Ρ…^3+Π°2*Ρ…^2+Π°1*Ρ…+Π°0;

Ρ€:= Π°4Ρ…4 + a3x3 + Π°2 Ρ…2 + a1 x + Π°0

> coeff(Ρ€,Ρ…);

Π°1

> coeff(Ρ€,Ρ…^3);

Π°3

> coeff(Ρ€,Ρ…,4);

Π°4

> coeffs(p,x);

a0, a4, a1, a3, a2

> q:=x^2+2*y^2+3*x+4*y+5;

q:= xΒ² +2 yΒ² + 3x + 4y +5

> coeffs(q);

5, 2, 3, 4, 1

> coeffs(q,y);

xΒ² +3x +5, 2, 4

> coeffs(q,x,y);

5+2yΒ²+4y, 3, 1

> collect(q,x);

xΒ² + 2(1,xΒ²,x)Β² + 3x + (4,4xΒ²,4x)+5

> collect(q,x,y);

y(1)xΒ² + y(3)x + y(5+2yΒ²+4Ρƒ)

Π”ΠΎΠΏΠΎΠ»Π½ΠΈΡ‚Π΅Π»ΡŒΠ½Ρ‹Π΅ ΠΏΡ€ΠΈΠΌΠ΅Ρ€Ρ‹ Π½Π° ΠΏΡ€ΠΈΠΌΠ΅Π½Π΅Π½ΠΈΠ΅ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ collect ΠΌΠΎΠΆΠ½ΠΎ Π½Π°ΠΉΡ‚ΠΈ Π² Ρ„Π°ΠΉΠ»Π΅ collect.

5.3.3. ΠžΡ†Π΅Π½ΠΊΠ° коэффициСнтов ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ° ΠΏΠΎ стСпСням

Полином ΠΌΠΎΠΆΠ΅Ρ‚ Π±Ρ‹Ρ‚ΡŒ Π½Π΅ΠΏΠΎΠ»Π½Ρ‹ΠΌ, Ρ‚ΠΎ Π΅ΡΡ‚ΡŒ Π½Π΅ ΡΠΎΠ΄Π΅Ρ€ΠΆΠ°Ρ‚ΡŒ Ρ‡Π»Π΅Π½ΠΎΠ² со стСпСнями Π½ΠΈΠΆΠ΅ Π½Π΅ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠΉ. Ѐункция lcoeff Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ ΡΡ‚Π°Ρ€ΡˆΠΈΠΉ, Π° функция tcoeff β€” младший коэффициСнт ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ° Π½Π΅ΡΠΊΠΎΠ»ΡŒΠΊΠΈΡ… ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ…. Π­Ρ‚ΠΈ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ Π·Π°Π΄Π°ΡŽΡ‚ΡΡ Π² Π²ΠΈΠ΄Π΅:

lcoeff(Ρ€)

tcoeff(Ρ€)

lcoeff(Ρ€, Ρ…)

tcoeff(Ρ€, Ρ…)

lcoeff(Ρ€, Ρ…, 't')

tcoeff(Ρ€, Ρ…, 't')

Π€ΡƒΠ½ΠΊΡ†ΠΈΠΈ lcoeff ΠΈ tcoeff Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°ΡŽΡ‚ ΡΡ‚Π°Ρ€ΡˆΠΈΠΉ (младший) коэффициСнт ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ° Ρ€ ΠΎΡ‚Π½ΠΎΡΠΈΡ‚Π΅Π»ΡŒΠ½ΠΎ ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ Ρ… ΠΈΠ»ΠΈ ряда ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ… ΠΏΡ€ΠΈ ΠΌΠ½ΠΎΠ³ΠΎΠΌΠ΅Ρ€Π½ΠΎΠΌ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ΅. Если Ρ… Π½Π΅ ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½ΠΎ, lcoeff (tcoeff) вычисляСт ΡΡ‚Π°Ρ€ΡˆΠΈΠΉ (младший) коэффициСнт ΠΎΡ‚Π½ΠΎΡΠΈΡ‚Π΅Π»ΡŒΠ½ΠΎ всСх ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ… ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ° p. Если Ρ‚Ρ€Π΅Ρ‚ΠΈΠΉ Π°Ρ€Π³ΡƒΠΌΠ΅Π½Ρ‚ t ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½, Ρ‚ΠΎ это имя Π½Π°Π·Π½Π°Ρ‡Π΅Π½ΠΎ ΡΡ‚Π°Ρ€ΡˆΠ΅ΠΌΡƒ (ΠΌΠ»Π°Π΄ΡˆΠ΅ΠΌΡƒ) Ρ‡Π»Π΅Π½Ρƒ p. Если Ρ… β€” СдинствСнноС нСизвСстноС, ΠΈ d β€” ΡΡ‚Π΅ΠΏΠ΅Π½ΡŒ p ΠΏΠΎ Ρ…, Ρ‚ΠΎ lcoeff(p, x) эквивалСнтно coeff(p, x, d). Если Ρ… β€” список ΠΈΠ»ΠΈ мноТСство нСизвСстных, lcoeff (tcoeff) вычисляСт ΡΡ‚Π°Ρ€ΡˆΠΈΠΉ (младший) коэффициСнт p, ΠΏΡ€ΠΈΡ‡Π΅ΠΌ p рассматриваСтся ΠΊΠ°ΠΊ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌ ΠΌΠ½ΠΎΠ³ΠΈΡ… ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ…. Π˜ΠΌΠ΅ΠΉΡ‚Π΅ Π² Π²ΠΈΠ΄Ρƒ, Ρ‡Ρ‚ΠΎ p Π΄ΠΎΠ»ΠΆΠ΅Π½ Π±Ρ‹Ρ‚ΡŒ Ρ€Π°Π·Π»ΠΎΠΆΠ΅Π½ ΠΏΠΎ стСпСням нСизвСстного x Π΄ΠΎ Π²Ρ‹Π·ΠΎΠ²Π° Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ lcoeff ΠΈΠ»ΠΈ tcoeff.

ΠŸΡ€ΠΈΠ²Π΅Π΄Π΅ΠΌ ΠΏΡ€ΠΈΠΌΠ΅Ρ€Ρ‹ примСнСния Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ lcoeff, tcoeff ΠΈ coeffs (Ρ„Π°ΠΉΠ» polan):

> q:=1/x^2+2/x+3+4*x+5*x^2;

> lcoeff(q,x);

5

> lcoeff(q,x,'t');

5

> t;

xΒ²

> coeffs(q,x,'t');

3, 1, 4, 2, 5

> t;

5.3.4. ΠžΡ†Π΅Π½ΠΊΠ° стСпСнСй ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ°

Ѐункция degree Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ Π²Ρ‹ΡΡˆΡƒΡŽ ΡΡ‚Π΅ΠΏΠ΅Π½ΡŒ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ°, a ldegree β€” Π½ΠΈΠ·ΡˆΡƒΡŽ ΡΡ‚Π΅ΠΏΠ΅Π½ΡŒ. Π­Ρ‚ΠΈ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ Π·Π°Π΄Π°ΡŽΡ‚ΡΡ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΌ ΠΎΠ±Ρ€Π°Π·ΠΎΠΌ:

degree(Π°,Ρ…)

ldegree(Π°, Ρ…)

Π€ΡƒΠ½ΠΊΡ†ΠΈΠΈ degree ΠΈ ldegree ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΡƒΡŽΡ‚ΡΡ, Ρ‡Ρ‚ΠΎΠ±Ρ‹ ΠΎΠΏΡ€Π΅Π΄Π΅Π»ΠΈΡ‚ΡŒ Π²Ρ‹ΡΡˆΡƒΡŽ ΠΈ Π½ΠΈΠ·ΡˆΡƒΡŽ ΡΡ‚Π΅ΠΏΠ΅Π½ΡŒ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠ° ΠΎΡ‚ нСизвСстного (нСизвСстных) Ρ…, ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠ΅ Ρ‡Π°Ρ‰Π΅ всСго являСтся СдинствСнным, Π½ΠΎ ΠΌΠΎΠΆΠ΅Ρ‚ Π±Ρ‹Ρ‚ΡŒ списком ΠΈΠ»ΠΈ мноТСством нСизвСстных. Полином ΠΌΠΎΠΆΠ΅Ρ‚ ΠΈΠΌΠ΅Ρ‚ΡŒ ΠΎΡ‚Ρ€ΠΈΡ†Π°Ρ‚Π΅Π»ΡŒΠ½Ρ‹Π΅ Ρ†Π΅Π»Ρ‹Π΅ ΠΏΠΎΠΊΠ°Π·Π°Ρ‚Π΅Π»ΠΈ стСпСнСй ΠΏΡ€ΠΈ Ρ…. Π’Π°ΠΊΠΈΠΌ ΠΎΠ±Ρ€Π°Π·ΠΎΠΌ, degree ΠΈ ldegree ΠΌΠΎΠ³ΡƒΡ‚ Π²ΠΎΠ·Π²Ρ€Π°Ρ‚ΠΈΡ‚ΡŒ ΠΎΡ‚Ρ€ΠΈΡ†Π°Ρ‚Π΅Π»ΡŒΠ½ΠΎΠ΅ ΠΈΠ»ΠΈ ΠΏΠΎΠ»ΠΎΠΆΠΈΡ‚Π΅Π»ΡŒΠ½ΠΎΠ΅ Ρ†Π΅Π»ΠΎΠ΅ число. Если Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ Π½Π΅ являСтся ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΠΎΠΌ ΠΎΡ‚ x сданным ΠΏΠ°Ρ€Π°ΠΌΠ΅Ρ‚Ρ€ΠΎΠΌ, Ρ‚ΠΎ возвращаСтся FAIL.

Π§Ρ‚ΠΎΠ±Ρ‹ degree ΠΈ ldegree Π²ΠΎΠ·Π²Ρ€Π°Ρ‚ΠΈΠ»ΠΈ Ρ‚ΠΎΡ‡Π½Ρ‹ΠΉ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚, ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌ ΠΎΠ±ΡΠ·Π°Ρ‚Π΅Π»ΡŒΠ½ΠΎ Π΄ΠΎΠ»ΠΆΠ΅Π½ Π±Ρ‹Ρ‚ΡŒ сгруппирован ΠΏΠΎ стСпСням Ρ…. НапримСр, для выраТСния (x+1)(Ρ…+2)-x^2 функция degree Π½Π΅ ΠΎΠ±Π½Π°Ρ€ΡƒΠΆΠΈΡ‚ Π°Π½Π½ΡƒΠ»ΠΈΡ€ΠΎΠ²Π°Π½ΠΈΠ΅ ΡΡ‚Π°Ρ€ΡˆΠ΅Π³ΠΎ Ρ‡Π»Π΅Π½Π° ΠΈ Π½Π΅ΠΏΡ€Π°Π²ΠΈΠ»ΡŒΠ½ΠΎ Π²ΠΎΠ·Π²Ρ€Π°Ρ‚ΠΈΡ‚ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ 2. Π’ΠΎ ΠΈΠ·Π±Π΅ΠΆΠ°Π½ΠΈΠ΅ этой ΠΏΡ€ΠΎΠ±Π»Π΅ΠΌΡ‹ ΠΏΠ΅Ρ€Π΅Π΄ Π²Ρ‹Π·ΠΎΠ²ΠΎΠΌ degree слСдуСт ΠΏΡ€ΠΈΠΌΠ΅Π½ΡΡ‚ΡŒ ΠΊ ΠΏΠΎΠ»ΠΈΠ½ΠΎΠΌΡƒ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ collect ΠΈΠ»ΠΈ expand. Если Ρ… β€” мноТСство нСизвСстных, degree/ldegree вычисляСт ΠΏΠΎΠ»Π½ΡƒΡŽ ΡΡ‚Π΅ΠΏΠ΅Π½ΡŒ. Если Ρ… β€” список нСизвСстных, degree/ldegree вычисляСт Π²Π΅ΠΊΡ‚ΠΎΡ€Π½ΡƒΡŽ ΡΡ‚Π΅ΠΏΠ΅Π½ΡŒ. ВСкторная ΡΡ‚Π΅ΠΏΠ΅Π½ΡŒ опрСдСляСтся ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΌ ΠΎΠ±Ρ€Π°Π·ΠΎΠΌ:

degree(Ρ€,[]) = 0

degree(Ρ€,[x1,Ρ…2,...]) = degree(Ρ€,x1)

degree(lcoeff(Ρ€,x1),[Ρ…2,...])

Полная ΡΡ‚Π΅ΠΏΠ΅Π½ΡŒ Ρ‚ΠΎΠ³Π΄Π° опрСдСляСтся ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΌ ΠΎΠ±Ρ€Π°Π·ΠΎΠΌ:

degree(Ρ€, {x1, ...,xn}) = maximum degree(Ρ€,{x1,...xn))

ΠΈΠ»ΠΈ

degree(Ρ€,{x1,...,xn}) = degree(p,[x1,...,xn])

ΠžΠ±Ρ€Π°Ρ‰Π°Π΅ΠΌ Π²Π½ΠΈΠΌΠ°Π½ΠΈΠ΅ Π½Π° Ρ‚ΠΎ, Ρ‡Ρ‚ΠΎ вСкторная ΡΡ‚Π΅ΠΏΠ΅Π½ΡŒ зависит ΠΎΡ‚ порядка пСрСчислСния нСизвСстных, Π° полная ΡΡ‚Π΅ΠΏΠ΅Π½ΡŒ Π½Π΅ зависит. ΠŸΡ€ΠΈΠΌΠ΅Ρ€Ρ‹ примСнСния Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ degree ΠΈ ldegree:

> restart;

> Ρ€:=Π°4*Ρ…^4+a3*Ρ…^3+Π°2*Ρ…^2;

Ρ€:=Π°4 Ρ…4 + a3 x3 + Π°2 Ρ…2

> degree(Ρ€,Ρ…);