ΠΠΎΡΡΡΠΎΠ΅Π½ΠΈΠ΅ ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΎΡΠ° ΠΌΠΎΡΡΠΊΠΈΡ ΠΏΠΎΠ΄Π²ΠΎΠ΄Π½ΡΡ ΡΠ΅Π»Π΅ΠΉ
ΠΡΠΎΠ±Π»Π΅ΠΌΠ° Π³ΠΈΠ΄ΡΠΎΠ°ΠΊΡΡΡΠΈΡΠ΅ΡΠΊΠΎΠΉ ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΈΠΈ ΡΠ΅Π»Π΅ΠΉ ΠΎΡΠ½ΠΎΡΠΈΡΡΡ ΠΊ ΡΠ°Π·ΡΡΠ΄Ρ Π½Π°ΠΈΠ±ΠΎΠ»Π΅Π΅ ΡΠ»ΠΎΠΆΠ½ΡΡ ΠΈ Π°ΠΊΡΡΠ°Π»ΡΠ½ΡΡ ΠΏΡΠΎΠ±Π»Π΅ΠΌ ΡΠΎΠ²ΡΠ΅ΠΌΠ΅Π½Π½ΠΎΠΉ Π³ΠΈΠ΄ΡΠΎΠ°ΠΊΡΡΡΠΈΠΊΠΈ. ΠΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΈΠΎΠ½Π½Π°Ρ Π·Π°Π΄Π°ΡΠ° Π²Ρ ΠΎΠ΄ΠΈΡ Π² ΠΊΠ°ΡΠ΅ΡΡΠ²Π΅ ΠΎΠ±ΡΠ·Π°ΡΠ΅Π»ΡΠ½ΠΎΠΉ ΠΊΠΎΠΌΠΏΠΎΠ½Π΅Π½ΡΡ Π² ΠΊΠ»Π°ΡΡΠΈΡΠ΅ΡΠΊΡΡ ΡΡΠΈΠ°Π΄Ρ Π·Π°Π΄Π°Ρ (ΠΎΠ±Π½Π°ΡΡΠΆΠ΅Π½ΠΈΠ΅ — ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΈΡ ΡΠ΅Π»Π΅ΠΉ — ΠΎΠΏΡΠ΅Π΄Π΅Π»Π΅Π½ΠΈΠ΅ ΠΊΠΎΠΎΡΠ΄ΠΈΠ½Π°Ρ ΠΈ ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠΎΠ² Π΄Π²ΠΈΠΆΠ΅Π½ΠΈΡ ΡΠ΅Π»Π΅ΠΉ), ΠΊΠΎΡΠΎΡΡΠ΅ Π΄ΠΎΠ»ΠΆΠ΅Π½ ΡΠ΅ΡΠ°ΡΡ ΠΠΠ. ΠΠ±ΡΠ°Π·, ΠΊΠ»Π°ΡΡ — ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΈΠΎΠ½Π½Π°Ρ Π³ΡΡΠΏΠΏΠΈΡΠΎΠ²ΠΊΠ° Π² ΡΠΈΡΡΠ΅ΠΌΠ΅… Π§ΠΈΡΠ°ΡΡ Π΅ΡΡ >
ΠΠΎΡΡΡΠΎΠ΅Π½ΠΈΠ΅ ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΎΡΠ° ΠΌΠΎΡΡΠΊΠΈΡ ΠΏΠΎΠ΄Π²ΠΎΠ΄Π½ΡΡ ΡΠ΅Π»Π΅ΠΉ (ΡΠ΅ΡΠ΅ΡΠ°Ρ, ΠΊΡΡΡΠΎΠ²Π°Ρ, Π΄ΠΈΠΏΠ»ΠΎΠΌ, ΠΊΠΎΠ½ΡΡΠΎΠ»ΡΠ½Π°Ρ)
ΠΡΡΡΠΎΠ²Π°Ρ ΡΠ°Π±ΠΎΡΠ° ΠΏΠΎ Π΄ΠΈΡΡΠΈΠΏΠ»ΠΈΠ½Π΅: ΠΠ΅ΡΠΎΠ΄Ρ ΠΈ ΡΡΠ΅Π΄ΡΡΠ²Π° ΠΎΠ±ΡΠ°Π±ΠΎΡΠΊΠΈ Π³ΠΈΠ΄ΡΠΎΡΠΈΠ·ΠΈΡΠ΅ΡΠΊΠΎΠΉ ΠΈΠ½ΡΠΎΡΠΌΠ°ΡΠΈΠΈ Π½Π° ΡΠ΅ΠΌΡ: ΠΠΎΡΡΡΠΎΠ΅Π½ΠΈΠ΅ ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΎΡΠ° ΠΌΠΎΡΡΠΊΠΈΡ ΠΏΠΎΠ΄Π²ΠΎΠ΄Π½ΡΡ ΡΠ΅Π»Π΅ΠΉ.
- ΠΠ²Π΅Π΄Π΅Π½ΠΈΠ΅
- gen_echo. m — ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΡΡ ΠΎΡΠΈΠ³Π½Π°Π»Π°
- work1_gen_one. echo. m — ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΡΡ ΠΎΡΠΈΠ³Π½Π°Π»Π° ΠΎΡ ΡΠΎΡΠ΅ΡΠ½ΠΎΠ³ΠΎ ΠΈΡΡΠΎΡΠ½ΠΈΠΊΠ° Π΄Π»ΠΈΡΠ΅Π»ΡΠ½ΠΎΡΡΡΡ t
- work1_gen_1echo. m — ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΡΡ ΠΎΡΠΈΠ³Π½Π°Π»Π° Π΄Π»Ρ ΠΏΡΠ°Π²ΠΎΠ³ΠΎ ΠΈ Π»Π΅Π²ΠΎΠ³ΠΎ ΠΊΠ°Π½Π°Π»Π° Π°Π½ΡΠ΅Π½Π½Ρ ΠΎΡ ΡΠΎΡΠ΅ΡΠ½ΠΎΠ³ΠΎ ΠΈΡΡΠΎΡΠ½ΠΈΠΊΠ°
- work1_gen_echo2. m — ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΡΡ ΠΎΡΠΈΠ³Π½Π°Π»Π° Π΄Π»Ρ ΠΏΡΠ°Π²ΠΎΠ³ΠΎ ΠΈ Π»Π΅Π²ΠΎΠ³ΠΎ ΠΊΠ°Π½Π°Π»Π° Π°Π½ΡΠ΅Π½Π½Ρ ΠΎΡ ΠΏΡΠΎΡΡΠΆΠ΅Π½Π½ΠΎΠ³ΠΎ ΠΈΡΡΠΎΡΠ½ΠΈΠΊΠ°
- work1_gen_noise. m — ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΡΡΠΌΠΎΠ²ΠΎΠ³ΠΎ ΡΠΈΠ³Π½Π°Π»Π° Π² ΠΊΠ°Π½Π°Π»Π°Ρ Π°Π½ΡΠ΅Π½Π½Ρ
- work1_gen_randn. m — ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΠΏΡΠΎΠΈΠ·Π²ΠΎΠ»ΡΠ½ΠΎ ΡΠ°ΡΠΏΠΎΠ»ΠΎΠΆΠ΅Π½Π½ΡΡ ΡΠΎΡΠ΅ΡΠ½ΡΡ ΠΈΡΡΠΎΡΠ½ΠΈΠΊΠΎΠ²
- work1_r. m — ΠΠ±Π½Π°ΡΡΠΆΠ΅Π½ΠΈΠ΅ ΠΏΡΠΈΠ½ΡΡΠΎΠ³ΠΎ ΡΠΈΠ³Π½Π°Π»Π° ΠΈ Π΅Π³ΠΎ ΠΏΠΎΡΠ»Π΅Π΄ΡΡΡΠ°Ρ ΠΎΠ±ΡΠ°Π±ΠΎΡΠΊΠ° Π΄Π»Ρ ΠΏΡΠΎΠΈΠ·Π²ΠΎΠ»ΡΠ½ΡΡ ΠΎΡΡΠ°ΠΆΠ°ΡΡΠΈΡ ΡΠΎΡΠ΅ΠΊ
- work1. m — ΠΠ±Π½Π°ΡΡΠΆΠ΅Π½ΠΈΠ΅ ΠΏΡΠΈΠ½ΡΡΠΎΠ³ΠΎ ΡΠΈΠ³Π½Π°Π»Π° ΠΈ Π΅Π³ΠΎ ΠΏΠΎΡΠ»Π΅Π΄ΡΡΡΠ°Ρ ΠΎΠ±ΡΠ°Π±ΠΎΡΠΊΠ° Π΄Π»Ρ Π»ΠΈΠ½Π΅ΠΉΠ½ΡΡ ΠΎΡΡΠ°ΠΆΠ°ΡΡΠΈΡ ΡΠΎΡΠ΅ΠΊ
- work1_sigma. m — ΠΠ°Ρ ΠΎΠΆΠ΄Π΅Π½ΠΈΠ΅ Π΄ΠΈΡΠΏΠ΅ΡΡΠΈΠΈ ΡΠΈΠ³Π½Π°Π»Π° Ρ ΡΡΠΌΠΎΠΌ
- work1_matr. m — ΠΠ°Ρ ΠΎΠΆΠ΄Π΅Π½ΠΈΠ΅ Π°ΠΏΠΏΡΠΎΠΊΡΠΈΠΌΠ°ΡΠΈΠΈ ΠΏΠΎΠ»ΠΎΠΆΠ΅Π½ΠΈΡ Π²ΡΡΠ²Π»Π΅Π½Π½ΠΎΠ³ΠΎ ΠΏΡΠΎΡΡΠΆΠ΅Π½Π½ΠΎΠ³ΠΎ ΠΎΠ±ΡΠ΅ΠΊΡΠ°
- work1_main. m — Π‘ΠΎΠ·Π΄Π°Π½ΠΈΠ΅ ΠΌΠ°ΡΡΠΈΠ²Π° Π΄Π»Ρ ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΎΡΠ°, ΡΠΎΡΡΠΎΡΡΠ΅Π³ΠΎ ΠΈΠ· ΡΠ»ΡΡΠ°ΠΉΠ½ΠΎ ΡΠ°ΡΠΏΠΎΠ»ΠΎΠΆΠ΅Π½Π½ΡΡ ΠΏΡΠΎΠΈΠ·Π²ΠΎΠ»ΡΠ½ΡΡ ΠΏΡΠΎΡΡΠΆΠ΅Π½Π½ΡΡ ΠΎΠ±ΡΠ΅ΠΊΡΠΎΠ², ΡΠΎΡΠ΅ΡΠ½ΡΡ ΠΈΡΡΠΎΡΠ½ΠΈΠΊΠΎΠ² Π³ΡΡΠΏΠΏΠΎΠ²ΡΡ ΠΈ ΠΎΠ΄ΠΈΠ½ΠΎΡΠ½ΡΡ
- Klas. m — Π‘ΠΎΠ·Π΄Π°Π½ΠΈΠ΅ Π½Π΅ΠΉΡΠΎΡΠ΅ΡΠΈ Π΄Π»Ρ ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΎΡΠ°
- Proverka_Klass. m — ΠΡΠΎΠ²Π΅ΡΠΊΠ° ΡΠ°Π±ΠΎΡΡ Π½Π΅ΠΉΡΠΎΡΠ΅ΡΠΈ ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΎΡΠ°
ΠΡΠΎΠ±Π»Π΅ΠΌΠ° Π³ΠΈΠ΄ΡΠΎΠ°ΠΊΡΡΡΠΈΡΠ΅ΡΠΊΠΎΠΉ ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΈΠΈ ΡΠ΅Π»Π΅ΠΉ ΠΎΡΠ½ΠΎΡΠΈΡΡΡ ΠΊ ΡΠ°Π·ΡΡΠ΄Ρ Π½Π°ΠΈΠ±ΠΎΠ»Π΅Π΅ ΡΠ»ΠΎΠΆΠ½ΡΡ ΠΈ Π°ΠΊΡΡΠ°Π»ΡΠ½ΡΡ ΠΏΡΠΎΠ±Π»Π΅ΠΌ ΡΠΎΠ²ΡΠ΅ΠΌΠ΅Π½Π½ΠΎΠΉ Π³ΠΈΠ΄ΡΠΎΠ°ΠΊΡΡΡΠΈΠΊΠΈ. ΠΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΈΠΎΠ½Π½Π°Ρ Π·Π°Π΄Π°ΡΠ° Π²Ρ ΠΎΠ΄ΠΈΡ Π² ΠΊΠ°ΡΠ΅ΡΡΠ²Π΅ ΠΎΠ±ΡΠ·Π°ΡΠ΅Π»ΡΠ½ΠΎΠΉ ΠΊΠΎΠΌΠΏΠΎΠ½Π΅Π½ΡΡ Π² ΠΊΠ»Π°ΡΡΠΈΡΠ΅ΡΠΊΡΡ ΡΡΠΈΠ°Π΄Ρ Π·Π°Π΄Π°Ρ (ΠΎΠ±Π½Π°ΡΡΠΆΠ΅Π½ΠΈΠ΅ — ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΈΡ ΡΠ΅Π»Π΅ΠΉ — ΠΎΠΏΡΠ΅Π΄Π΅Π»Π΅Π½ΠΈΠ΅ ΠΊΠΎΠΎΡΠ΄ΠΈΠ½Π°Ρ ΠΈ ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠΎΠ² Π΄Π²ΠΈΠΆΠ΅Π½ΠΈΡ ΡΠ΅Π»Π΅ΠΉ), ΠΊΠΎΡΠΎΡΡΠ΅ Π΄ΠΎΠ»ΠΆΠ΅Π½ ΡΠ΅ΡΠ°ΡΡ ΠΠΠ. ΠΠ±ΡΠ°Π·, ΠΊΠ»Π°ΡΡ — ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΈΠΎΠ½Π½Π°Ρ Π³ΡΡΠΏΠΏΠΈΡΠΎΠ²ΠΊΠ° Π² ΡΠΈΡΡΠ΅ΠΌΠ΅ ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΈΠΈ, ΠΎΠ±ΡΠ΅Π΄ΠΈΠ½ΡΡΡΠ°Ρ (Π²ΡΠ΄Π΅Π»ΡΡΡΠ°Ρ) ΠΎΠΏΡΠ΅Π΄Π΅Π»Π΅Π½Π½ΡΡ Π³ΡΡΠΏΠΏΡ ΠΎΠ±ΡΠ΅ΠΊΡΠΎΠ² ΠΏΠΎ Π½Π΅ΠΊΠΎΡΠΎΡΠΎΠΌΡ ΠΏΡΠΈΠ·Π½Π°ΠΊΡ.
Π ΡΠ΅Π»ΠΎΠΌ ΠΏΡΠΎΠ±Π»Π΅ΠΌΠ° ΡΠ°ΡΠΏΠΎΠ·Π½Π°Π²Π°Π½ΠΈΡ ΠΎΠ±ΡΠ°Π·ΠΎΠ² ΡΠΎΡΡΠΎΠΈΡ ΠΈΠ· Π΄Π²ΡΡ ΡΠ°ΡΡΠ΅ΠΉ: ΠΎΠ±ΡΡΠ΅Π½ΠΈΡ ΠΈ ΡΠ°ΡΠΏΠΎΠ·Π½Π°Π²Π°Π½ΠΈΡ. ΠΠ±ΡΡΠ΅Π½ΠΈΠ΅ ΠΎΡΡΡΠ΅ΡΡΠ²Π»ΡΠ΅ΡΡΡ ΠΏΡΡΠ΅ΠΌ ΠΏΠΎΠΊΠ°Π·Π° ΠΎΡΠ΄Π΅Π»ΡΠ½ΡΡ ΠΎΠ±ΡΠ΅ΠΊΡΠΎΠ² Ρ ΡΠΊΠ°Π·Π°Π½ΠΈΠ΅ΠΌ ΠΈΡ ΠΏΡΠΈΠ½Π°Π΄Π»Π΅ΠΆΠ½ΠΎΡΡΠΈ ΡΠΎΠΌΡ ΠΈΠ»ΠΈ Π΄ΡΡΠ³ΠΎΠΌΡ ΠΎΠ±ΡΠ°Π·Ρ. Π ΡΠ΅Π·ΡΠ»ΡΡΠ°ΡΠ΅ ΠΎΠ±ΡΡΠ΅Π½ΠΈΡ ΡΠ°ΡΠΏΠΎΠ·Π½Π°ΡΡΠ°Ρ ΡΠΈΡΡΠ΅ΠΌΠ° Π΄ΠΎΠ»ΠΆΠ½Π° ΠΏΡΠΈΠΎΠ±ΡΠ΅ΡΡΠΈ ΡΠΏΠΎΡΠΎΠ±Π½ΠΎΡΡΡ ΡΠ΅Π°Π³ΠΈΡΠΎΠ²Π°ΡΡ ΠΎΠ΄ΠΈΠ½Π°ΠΊΠΎΠ²ΡΠΌΠΈ ΡΠ΅Π°ΠΊΡΠΈΡΠΌΠΈ Π½Π° Π²ΡΠ΅ ΠΎΠ±ΡΠ΅ΠΊΡΡ ΠΎΠ΄Π½ΠΎΠ³ΠΎ ΠΎΠ±ΡΠ°Π·Π° ΠΈ ΡΠ°Π·Π»ΠΈΡΠ½ΡΠΌΠΈ — Π½Π° Π²ΡΠ΅ ΠΎΠ±ΡΠ΅ΠΊΡΡ ΡΠ°Π·Π»ΠΈΡΠ½ΡΡ ΠΎΠ±ΡΠ°Π·ΠΎΠ². ΠΡΠ΅Π½Ρ Π²Π°ΠΆΠ½ΠΎ, ΡΡΠΎ ΠΏΡΠΎΡΠ΅ΡΡ ΠΎΠ±ΡΡΠ΅Π½ΠΈΡ Π΄ΠΎΠ»ΠΆΠ΅Π½ Π·Π°Π²Π΅ΡΡΠΈΡΡΡΡ ΡΠΎΠ»ΡΠΊΠΎ ΠΏΡΡΠ΅ΠΌ ΠΏΠΎΠΊΠ°Π·ΠΎΠ² ΠΊΠΎΠ½Π΅ΡΠ½ΠΎΠ³ΠΎ ΡΠΈΡΠ»Π° ΠΎΠ±ΡΠ΅ΠΊΡΠΎΠ² Π±Π΅Π· ΠΊΠ°ΠΊΠΈΡ -Π»ΠΈΠ±ΠΎ Π΄ΡΡΠ³ΠΈΡ ΠΏΠΎΠ΄ΡΠΊΠ°Π·ΠΎΠΊ.
ΠΠ΅ΠΉΡΠΎΠ½Π½ΡΠ΅ ΡΠ΅ΡΠΈ — ΡΡΠΎ Π½Π΅Π±ΠΎΠ»ΡΡΠΈΠ΅ ΠΌΠΎΠ΄Π΅Π»ΠΈ, ΡΠΎΠ·Π΄Π°Π½Π½ΡΠ΅ ΠΏΠΎ ΠΏΠΎΠ΄ΠΎΠ±ΠΈΡ Π±ΠΈΠΎΠ»ΠΎΠ³ΠΈΡΠ΅ΡΠΊΠΈΡ Π½Π΅ΠΉΡΠΎΠ½Π½ΡΡ ΡΠ΅ΡΠ΅ΠΉ. Π£ΡΠ΅Π½ΡΠ΅ ΡΠΎΠ·Π΄Π°ΡΡ ΡΠ°ΠΊΠΈΠ΅ ΠΌΠΎΠ΄Π΅Π»ΠΈ Π΄Π»Ρ ΠΏΠΎΠ»ΡΡΠ΅Π½ΠΈΡ ΠΈΠ½ΡΠ΅Π»Π»Π΅ΠΊΡΡΠ°Π»ΡΠ½ΡΡ ΡΠ²ΠΎΠΉΡΡΠ² Π² ΡΠ°Π·Π»ΠΈΡΠ½ΡΡ ΡΠΈΡΡΠ΅ΠΌΠ°Ρ . ΠΠ΅ΠΉΡΠΎΠ½Π½ΡΠ΅ ΡΠ΅ΡΠΈ ΠΌΠΎΠ³ΡΡ Π±ΡΡΡ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½Ρ Π² ΠΎΠ±Π»Π°ΡΡΡΡ , Π³Π΄Π΅ ΡΡΠ°Π΄ΠΈΡΠΈΠΎΠ½Π½ΡΠ΅ ΠΌΠ΅ΡΠΎΠ΄Ρ Π²ΡΡΠΈΡΠ»Π΅Π½ΠΈΠΉ Π·Π°ΡΡΡΠ΄Π½Π΅Π½Ρ ΠΈ ΠΌΠ°Π»ΠΎΡΡΡΠ΅ΠΊΡΠΈΠ²Π½Ρ, Π½Π°ΠΏΡΠΈΠΌΠ΅Ρ, Π² ΡΠ°ΡΠΏΠΎΠ·Π½Π°Π²Π°Π½ΠΈΠΈ Π»ΠΈΡ, ΡΠΈΠΌΠ²ΠΎΠ»ΠΎΠ². ΠΠ»Π°Π²Π½ΠΎΠ΅ ΡΠ²ΠΎΠΉΡΡΠ²ΠΎ ΡΠ΅ΡΠ΅ΠΉ — ΡΠΏΠΎΡΠΎΠ±Π½ΠΎΡΡΡ ΠΊ ΠΎΠ±ΡΡΠ΅Π½ΠΈΡ. ΠΠ΅ΠΉΡΠΎΠ½Π½ΡΠ΅ ΡΠ΅ΡΠΈ ΠΌΠΎΠ³ΡΡ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡΡΡ Π΄Π»Ρ Ρ ΡΠ°Π½Π΅Π½ΠΈΡ ΠΊΠΎΠΌΠΏΠ»Π΅ΠΊΡΠ½ΡΡ Π΄Π°Π½Π½ΡΡ . ΠΡΠΈ ΠΏΡΠ΅Π΄ΡΡΠ²Π»Π΅Π½ΠΈΠΈ ΡΠ°ΡΡΠΈ ΠΊΠΎΠΌΠΏΠ»Π΅ΠΊΡΠ½ΡΡ Π΄Π°Π½Π½ΡΡ ΠΈΠ»ΠΈ Π·Π°ΡΡΠΌΠ»Π΅Π½Π½ΡΡ (ΠΈΡΠΏΠΎΡΡΠ΅Π½Π½ΡΡ ) Π΄Π°Π½Π½ΡΡ ΠΎΠ½ΠΈ ΠΌΠΎΠ³ΡΡ Π²ΠΎΡΡΡΠ°Π½ΠΎΠ²ΠΈΡΡ ΠΈΡΡ ΠΎΠ΄Π½ΡΠΉ Π½Π°Π±ΠΎΡ.
ΠΡΠΈΠΌΠ΅Π½Π΅Π½ΠΈΠ΅ Π½Π΅ΠΉΡΠΎΡΠ΅ΡΠ΅Π²ΡΡ Π°Π»Π³ΠΎΡΠΈΡΠΌΠΎΠ² ΠΈ ΠΎΡΠ΄Π΅Π»ΡΠ½ΡΡ ΠΏΠ°ΡΠ°Π΄ΠΈΠ³ΠΌ Π΄Π»Ρ ΡΠ΅ΡΠ΅Π½ΠΈΡ ΡΠ°Π·Π»ΠΈΡΠ½ΡΡ Π½Π°ΡΡΠ½ΠΎ-ΡΠ΅Ρ Π½ΠΈΡΠ΅ΡΠΊΠΈΡ Π·Π°Π΄Π°Ρ Π²ΡΠ΅ Π±ΠΎΠ»ΡΡΠ΅ Π·Π°Π½ΠΈΠΌΠ°Π΅Ρ ΡΠΌΡ ΡΡΠ΅Π½ΡΡ ΠΈ ΠΈΠ½ΠΆΠ΅Π½Π΅ΡΠΎΠ². ΠΡΠ±Π°Ρ Π½Π΅ΠΉΡΠΎΡΠ΅ΡΠ΅Π²Π°Ρ ΠΏΠ°ΡΠ°Π΄ΠΈΠ³ΠΌΠ° ΠΎΡΡΠ°Π΅ΡΡΡ ΠΊΡΠ°ΡΠΈΠ²ΠΎΠΉ ΠΌΠ°ΡΠ΅ΠΌΠ°ΡΠΈΡΠ΅ΡΠΊΠΎΠΉ Π°Π±ΡΡΡΠ°ΠΊΡΠΈΠ΅ΠΉ Π΄ΠΎ ΡΠ΅Ρ ΠΏΠΎΡ, ΠΏΠΎΠΊΠ° ΠΎΠ½Π° Π½Π΅ Π±ΡΠ΄Π΅Ρ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΠ½ΠΎ ΠΈΠ»ΠΈ Π°ΠΏΠΏΠ°ΡΠ°ΡΠ½ΠΎ ΡΠ΅Π°Π»ΠΈΠ·ΠΎΠ²Π°Π½Π°.
ΠΠ»Ρ ΡΠ΅ΡΠ΅Π½ΠΈΡ Π·Π°Π΄Π°Ρ Π°ΠΊΡΠΈΠ²Π½ΠΎ ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΡΡΡΡ Π½Π΅ΠΉΡΠΎΡΠ΅ΡΠ΅Π²ΡΠ΅ Π°Π»Π³ΠΎΡΠΈΡΠΌΡ. ΠΡΠΈ Π²ΡΠ±ΠΎΡΠ΅ ΡΡΡΡΠΊΡΡΡΡ Π½Π΅ΠΉΡΠΎΠ½Π½ΠΎΠΉ ΡΠ΅ΡΠΈ (ΠΠ‘) Π΄Π»Ρ ΡΠ΅ΡΠ΅Π½ΠΈΡ Π·Π°Π΄Π°ΡΠΈ ΡΠ°ΡΠΏΠΎΠ·Π½Π°Π²Π°Π½ΠΈΡ ΠΈΠ·ΠΎΠ±ΡΠ°ΠΆΠ΅Π½ΠΈΠΉ Π½Π΅ΠΎΠ±Ρ ΠΎΠ΄ΠΈΠΌΠΎ ΡΡΠΈΡΡΠ²Π°ΡΡ ΡΠ»Π΅Π΄ΡΡΡΠΈΠ΅ Π°ΡΠΏΠ΅ΠΊΡΡ:
1) ΡΠΏΠΎΡΠΎΠ±Π½ΠΎΡΡΡ ΡΠ΅ΡΠΈ ΠΊ ΠΎΠ±ΡΡΠ΅Π½ΠΈΡ, ΡΠΎ Π΅ΡΡΡ Π²ΠΎΠ·ΠΌΠΎΠΆΠ½ΠΎΡΡΡ Π½Π°ΡΡΠΈΡΡ ΡΠΈΡΡΠ΅ΠΌΡ ΡΠ°ΡΠΏΠΎΠ·Π½Π°Π²Π°ΡΡ ΡΡΠ΅Π±ΡΠ΅ΠΌΠΎΠ΅ ΠΊΠΎΠ»ΠΈΡΠ΅ΡΡΠ²ΠΎ ΠΎΠ±ΡΠ΅ΠΊΡΠΎΠ². Π§Π΅ΠΌ Π±ΠΎΠ»ΡΡΠ΅ Π² ΡΠ΅ΡΠΈ ΡΠ»ΠΎΡΠ² ΠΈ Π½Π΅ΠΉΡΠΎΠ½ΠΎΠ², ΡΠ΅ΠΌ Π²ΡΡΠ΅ ΡΠΏΠΎΡΠΎΠ±Π½ΠΎΡΡΠΈ ΠΈ ΠΏΠΎΡΡΠ΅Π±Π½ΠΎΡΡΠΈ Π² Π°ΠΏΠΏΠ°ΡΠ°ΡΠ½ΡΡ ΡΠ΅ΡΡΡΡΠ°Ρ ;
2) Π±ΡΡΡΡΠΎΠ΄Π΅ΠΉΡΡΠ²ΠΈΠ΅, ΠΊΠΎΡΠΎΡΠΎΠ΅ Π΄ΠΎΡΡΠΈΠ³Π°Π΅ΡΡΡ ΡΠΌΠ΅Π½ΡΡΠ΅Π½ΠΈΠ΅ΠΌ ΡΠ»ΠΎΠΆΠ½ΠΎΡΡΠΈ ΡΠ΅ΡΠΈ — ΡΠ΅ΠΌ ΠΌΠ΅Π½ΡΡΠ΅ Π½ΡΠΆΠ½ΠΎ Π°ΠΏΠΏΠ°ΡΠ°ΡΠ½ΡΡ ΡΠ΅ΡΡΡΡΠΎΠ², ΡΠ΅ΠΌ Π±ΡΡΡΡΠ΅Π΅ ΠΎΡΡΡΠ΅ΡΡΠ²Π»ΡΠ΅ΡΡΡ ΡΠ°Π±ΠΎΡΠ° ΠΠ‘.
ΠΠΎΠ»Π΅Π·Π½ΡΠΉ ΡΡ ΠΎ-ΡΠΈΠ³Π½Π°Π» Π² Π°ΠΊΡΠΈΠ²Π½ΠΎΠΌ ΡΠ΅ΠΆΠΈΠΌΠ΅ ΠΏΡΠ΅Π΄ΡΡΠ°Π²Π»ΡΠ΅Ρ ΠΎΠ΄ΠΈΠ½ ΠΈΠΌΠΏΡΠ»ΡΡ ΠΈΠ»ΠΈ Π³ΡΡΠΏΠΏΡ ΠΈΠΌΠΏΡΠ»ΡΡΠΎΠ². Π‘Π²ΠΎΠΉΡΡΠ²Π° ΡΡ ΠΎ-ΡΠΈΠ³Π½Π°Π»Π° ΠΎΠΏΡΠ΅Π΄Π΅Π»ΡΡΡΡΡ Π²ΠΈΠ΄ΠΎΠΌ Π·ΠΎΠ½Π΄ΠΈΡΡΡΡΠ΅Π³ΠΎ ΡΠΈΠ³Π½Π°Π»Π° (ΠΏΠΎΡΡΠ»ΠΊΠΈ) ΠΈ Π΅Π³ΠΎ ΠΏΠ°ΡΠ°ΠΌΠ΅ΡΡΠ°ΠΌΠΈ.
ΠΠΎΠ½Π΄ΠΈΡΡΡΡΠΈΠΉ ΡΠΈΠ³Π½Π°Π» ΠΌΠΎΠΆΠ΅Ρ ΠΏΡΠ΅Π΄ΡΡΠ°Π²Π»ΡΡΡ ΡΠΎΠ±ΠΎΠΉ ΠΎΠ΄ΠΈΠ½ΠΎΡΠ½ΡΠΉ ΠΈΠΌΠΏΡΠ»ΡΡ Ρ Π·Π°Π΄Π°Π½Π½ΡΠΌ Π·Π°ΠΊΠΎΠ½ΠΎΠΌ ΠΌΠΎΠ΄ΡΠ»ΡΡΠΈΠΈ ΠΈΠ»ΠΈ ΠΏΠ°ΡΠΊΡ ΠΈΠΌΠΏΡΠ»ΡΡΠΎΠ², ΡΠ°ΠΊΠΆΠ΅ ΠΈΠΌΠ΅ΡΡΠΈΡ ΠΌΠΎΠ΄ΡΠ»ΡΡΠΈΡ ΠΊΠ°ΠΆΠ΄ΠΎΠ³ΠΎ ΠΈΠΌΠΏΡΠ»ΡΡΠ°. ΠΡΠΎΡΡΠ΅ΠΉΡΠ°Ρ ΡΠ΅ΠΎΡΠ΅ΡΠΈΡΠ΅ΡΠΊΠ°Ρ ΠΌΠΎΠ΄Π΅Π»Ρ ΡΡ ΠΎ-ΡΠΈΠ³Π½Π°Π»Π° ΠΏΡΠ΅Π΄ΡΡΠΌΠ°ΡΡΠΈΠ²Π°Π΅Ρ ΡΠΎΡΠ½ΠΎΠ΅ ΡΠΎΠΏΠΎΡΡΠ°Π²Π»Π΅Π½ΠΈΠ΅ ΡΡ ΠΎ-ΡΠΈΠ³Π½Π°Π»Π° Π·ΠΎΠ½Π΄ΠΈΡΡΡΡΠ΅ΠΌΡ Ρ ΠΏΠΎΠΏΡΠ°Π²ΠΊΠΎΠΉ Π½Π° ΡΡΡΠ΅ΠΊΡ ΠΠΎΠΏΠ»Π΅ΡΠ°.
Π Π΅Π°Π»ΡΠ½ΡΠΉ ΡΡ ΠΎ-ΡΠΈΠ³Π½Π°Π» ΠΏΡΠ΅Π΄ΡΡΠ°Π²Π»ΡΠ΅Ρ ΡΠΎΠ±ΠΎΠΉ Π½Π°Π±ΠΎΡ ΡΡ ΠΎ, ΠΏΡΠΈΠ½ΠΈΠΌΠ°Π΅ΠΌΡΡ ΠΏΠΎ ΡΠ°Π·Π½ΡΠΌ ΡΡΠ°ΡΡΠ°ΠΌ ΠΎΡ ΠΏΡΠΎΡΡΠΆΠ΅Π½Π½ΠΎΠ³ΠΎ ΠΎΠ±ΡΠ΅ΠΊΡΠ° Π»ΠΎΠΊΠ°ΡΠΈΡ. ΠΡΠ»ΠΈΡΠΈΠ΅ ΠΌΠΎΠ΄Π΅Π»ΠΈ ΡΠ°ΠΊΠΎΠ³ΠΎ ΡΠΈΠ³Π½Π°Π»Π° ΠΎΡ ΠΏΡΠΎΡΡΠ΅ΠΉΡΠ΅ΠΉ ΠΌΠΎΠ΄Π΅Π»ΠΈ ΡΠΈΠ³Π½Π°Π»Π° ΡΠΎΡΠ΅ΡΠ½ΠΎΠ³ΠΎ ΠΎΠ±ΡΠ΅ΠΊΡΠ° ΡΠΎΡΡΠΎΠΈΡ Π² ΡΠ»ΡΡΠ°ΠΉΠ½ΡΡ ΡΠ»ΡΠΊΡΡΠ°ΡΠΈΡΡ ΡΠΈΠ³Π½Π°Π»Π°, Π²ΠΎΠ·Π½ΠΈΠΊΠ°ΡΡΠΈΡ Π² ΡΠ΅Π·ΡΠ»ΡΡΠ°ΡΠ΅ ΡΠ»ΠΎΠΆΠ΅Π½ΠΈΡ ΡΠ»Π΅ΠΌΠ΅Π½ΡΠ°ΡΠ½ΡΡ ΡΡ ΠΎ ΡΠΎ ΡΠ»ΡΡΠ°ΠΉΠ½ΡΠΌΠΈ Π½Π°ΡΠ°Π»ΡΠ½ΡΠΌΠΈ ΡΠ°Π·Π°ΠΌΠΈ.
ΠΡΠΎΡΡΠ΅ΠΉΡΠΈΠΉ ΠΎΠ±Π½Π°ΡΡΠΆΠΈΡΠ΅Π»Ρ Π² Π°ΠΊΡΠΈΠ²Π½ΠΎΠΌ ΡΠ΅ΠΆΠΈΠΌΠ΅ — ΡΡΠΎ ΡΠΈΠΏΠΎΠ²ΠΎΠΉ ΡΡΠ°ΠΊΡ Ρ ΠΏΠΎΡΠΎΠ³ΠΎΠ²ΡΠΌ ΡΡΡΡΠΎΠΉΡΡΠ²ΠΎΠΌ. ΠΡΠ»ΠΈΡΠΈΠ΅ ΡΠΎΡΡΠΎΠΈΡ Π² Π½Π΅ΡΡΠ°ΡΠΈΠΎΠ½Π°ΡΠ½ΠΎΡΡΠΈ ΠΏΠΎΠΌΠ΅Ρ ΠΈ Π±ΠΎΠ»ΡΡΠΎΠΌ Π΄ΠΈΠ½Π°ΠΌΠΈΡΠ΅ΡΠΊΠΎΠΌ Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½Π΅ ΠΏΠΎΠ»Π΅Π·Π½ΠΎΠ³ΠΎ ΡΠΈΠ³Π½Π°Π»Π° ΠΈ ΠΏΠΎΠΌΠ΅Ρ ΠΈ, ΡΠ²ΡΠ·Π°Π½Π½ΠΎΠΌ Ρ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΠΌ ΡΠ°ΡΡΡΠΎΡΠ½ΠΈΠ΅ΠΌ ΠΎΡ Π»ΠΎΠΊΠ°ΡΠΎΡΠ° Π΄ΠΎ ΠΎΠ±ΡΠ΅ΠΊΡΠ°
Π ΡΠΎΠΎΡΠ²Π΅ΡΡΡΠ²ΠΈΠΈ Ρ ΡΠΈΠΏΠΎΠΌ ΠΏΡΠΈΠΌΠ΅Π½ΡΠ΅ΠΌΠΎΠ³ΠΎ Π·ΠΎΠ½Π΄ΠΈΡΡΡΡΠ΅Π³ΠΎ ΡΠΈΠ³Π½Π°Π»Π° ΠΌΠΎΠΆΠ½ΠΎ ΡΠ°ΡΡΠΌΠ°ΡΡΠΈΠ²Π°ΡΡ ΡΠ·ΠΊΠΎΠΏΠΎΠ»ΠΎΡΠ½ΡΠ΅ ΡΡ ΠΎ-ΡΠΈΠ³Π½Π°Π»Ρ ΠΈ ΡΠΈΡΠΎΠΊΠΎΠΏΠΎΠ»ΠΎΡΠ½ΡΠ΅. Π’ΠΈΠΏΠΈΡΠ½ΡΠΉ ΡΠ·ΠΊΠΎΠΏΠΎΠ»ΠΎΡΠ½ΡΠΉ ΡΠΈΠ³Π½Π°Π» — ΡΡΠΎ ΡΡΠ°ΡΡΠΎΠΊ Π³Π°ΡΠΌΠΎΠ½ΠΈΡΠ΅ΡΠΊΠΎΠ³ΠΎ ΠΊΠΎΠ»Π΅Π±Π°Π½ΠΈΡ Ρ ΠΏΡΡΠΌΠΎΡΠ³ΠΎΠ»ΡΠ½ΠΎΠΉ ΠΈΠ»ΠΈ ΡΡΠ°ΠΏΠ΅ΡΠ΅ΠΈΠ΄Π°Π»ΡΠ½ΠΎΠΉ ΠΎΠ³ΠΈΠ±Π°ΡΡΠ΅ΠΉ, ΠΏΡΠΈ ΠΏΡΡΠΌΠΎΡΠ³ΠΎΠ»ΡΠ½ΠΎΠΉ ΠΎΠ³ΠΈΠ±Π°ΡΡΠ΅ΠΉ ΠΏΠ΅ΡΠ΅Π΄Π½ΠΈΠΉ ΠΈ Π·Π°Π΄Π½ΠΈΠΉ ΡΡΠΎΠ½ΡΡ ΠΊΠΎΡΠΎΡΠΊΠΈΠ΅.
ΠΡΡΠ³ΠΎΠΉ ΡΠ°Π·Π½ΠΎΠ²ΠΈΠ΄Π½ΠΎΡΡΡΡ ΡΠΈΠ³Π½Π°Π»ΠΎΠ² ΡΠ²Π»ΡΡΡΡΡ ΡΠΈΡΠΎΠΊΠΎΠΏΠΎΠ»ΠΎΡΠ½ΡΠ΅ (ΡΠ»ΠΎΠΆΠ½ΡΠ΅) ΡΠΈΠ³Π½Π°Π»Ρ, ΠΊΠΎΡΠΎΡΡΠ΅ ΠΏΡΠ΅Π΄ΡΡΠ°Π²Π»ΡΡΡ ΡΠΎΠ±ΠΎΠΉ ΠΈΠΌΠΏΡΠ»ΡΡΡ ΠΎΠ±ΡΡΠ½ΠΎ Ρ ΠΏΡΡΠΌΠΎΡΠ³ΠΎΠ»ΡΠ½ΠΎΠΉ ΠΎΠ³ΠΈΠ±Π°ΡΡΠ΅ΠΉ ΠΈ Π²Π½ΡΡΡΠΈΠΈΠΌΠΏΡΠ»ΡΡΠ½ΠΎΠΉ ΡΠ°ΡΡΠΎΡΠ½ΠΎΠΉ ΠΈΠ»ΠΈ ΡΠ°Π·ΠΎΠ²ΠΎΠΉ ΠΌΠΎΠ΄ΡΠ»ΡΡΠΈΠ΅ΠΉ, ΠΎΠ±Π΅ΡΠΏΠ΅ΡΠΈΠ²Π°ΡΡΠ΅ΠΉ Π·Π½Π°ΡΠΈΡΠ΅Π»ΡΠ½ΡΡ ΡΠΈΡΠΈΠ½Ρ ΡΠΏΠ΅ΠΊΡΡΠ° ΡΠΈΠ³Π½Π°Π»Π°. ΠΠΎΡΠ»Π΅Π΄ΠΎΠ²Π°ΡΠ΅Π»ΡΠ½ΠΎΡΡΡ ΠΈΠΌΠΏΡΠ»ΡΡΠΎΠ² ΡΠ²Π»ΡΠ΅ΡΡΡ ΡΠ»ΠΎΠΆΠ½ΡΠΌ ΡΠΈΠ³Π½Π°Π»ΠΎΠΌ. ΠΠΎΡΠ»Π΅Π΄ΠΎΠ²Π°ΡΠ΅Π»ΡΠ½ΠΎΡΡΡ ΡΠΈΠ³Π½Π°Π»ΠΎΠ² ΠΌΠΎΠΆΠ΅Ρ ΡΠΎΡΡΠΎΡΡΡ ΠΊΠ°ΠΊ ΠΈΠ· ΠΏΡΠΎΡΡΡΡ , ΡΠ°ΠΊ ΠΈ ΠΈΠ· ΡΠ»ΠΎΠΆΠ½ΡΡ ΡΠΈΠ³Π½Π°Π»ΠΎΠ².
Π½Π΅ΠΉΡΠΎΠ½Π½Π°Ρ ΡΠ΅ΡΡ ΠΏΠΎΠ΄Π²ΠΎΠ΄Π½Π°Ρ ΡΠ΅Π»Ρ
gen_echo. m — ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΡΡ ΠΎΡΠΈΠ³Π½Π°Π»Π°
ΠΠ΅Π½Π΅ΡΠ°ΡΠΎΡ Π²ΡΡΠ°Π±Π°ΡΡΠ²Π°Π΅Ρ ΠΈΠΌΠΏΡΠ»ΡΡΡ, ΠΊΠΎΡΠΎΡΡΠ΅ ΠΏΡΠΎΡ ΠΎΠ΄ΡΡ ΠΎΠΏΡΠ΅Π΄Π΅Π»Π΅Π½Π½ΠΎΠ΅ ΡΠ°ΡΡΡΠΎΡΠ½ΠΈΠ΅. Π‘ΠΈΠ³Π½Π°Π»Ρ, ΠΎΡΡΠ°ΠΆΠ΅Π½Π½ΡΠ΅ ΠΎΡ ΠΏΡΠ΅ΠΏΡΡΡΡΠ²ΠΈΠΉ, Π²ΡΡΡΠ΅ΡΠΈΠ²ΡΠΈΡ ΡΡ Π½Π° ΠΏΡΡΠΈ Π»ΡΡΠ°, Π³Π΅Π½Π΅ΡΠΈΡΡΡΡΡΡ Π² ΡΠ²Π΅Π΄Π΅Π½ΠΈΡ ΠΎ ΠΏΠΎΠ΄Π²ΠΎΠ΄Π½ΡΡ ΠΎΠ±ΡΠ΅ΠΊΡΠ°Ρ . ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΡΡ ΠΎΡΠΈΠ³Π½Π°Π»Π° ΠΎΡ ΡΠΎΡΠ΅ΡΠ½ΠΎΠ³ΠΎ ΠΈΡΡΠΎΡΠ½ΠΈΠΊΠ°. Π§Π΅ΠΌ ΡΠΈΠ»ΡΠ½Π΅Π΅ ΡΡ ΠΎΡΠΈΠ³Π½Π°Π», ΡΠ΅ΠΌ Π±ΠΎΠ»ΡΡΠ΅ Π°ΠΌΠΏΠ»ΠΈΡΡΠ΄Π° ΠΈ, ΡΠΎΠΎΡΠ²Π΅ΡΡΡΠ²Π΅Π½Π½ΠΎ, ΡΠΎΡΠ½Π΅Π΅ ΠΎΠΏΡΠ΅Π΄Π΅Π»Π΅Π½ΠΈΠ΅ ΡΠ΅Π»ΠΈ Π½Π° Π³Π»ΡΠ±ΠΈΠ½Π΅.
function echo = gen_echo (r, phi); %ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΡΠΈΠ³Π½Π°Π»Π° Π½Π° ΠΊΠ°Π½Π°Π»Π°Ρ Π°Π½ΡΠ΅Π½Π½Ρ Π² Π·Π°Π²ΠΈΡΠΈΠΌΠΎΡΡΠΈ ΠΎΡ Π΄ΠΈΡΡΠ°Π½ΡΠΈΠΈ ΠΈ ΠΏΠ΅Π»Π΅Π½Π³Π° ΡΠ΅Π»ΠΈ
f=20 000; %Π§Π°ΡΡΠΎΡΠ° ΠΏΡΠΈΠ½ΠΈΠΌΠ°Π΅ΠΌΠΎΠ³ΠΎ ΡΠΈΠ³Π½Π°Π»Π°
base=0.032; %Π¨ΠΈΡΠΈΠ½Π° Π±Π°Π·Ρ Π°Π½ΡΠ΅Π½Π½Ρ
t=0: 1/ (4*f): 2*r/1500; %ΠΠ»ΠΈΡΠ΅Π»ΡΠ½ΠΎΡΡΡ Π³Π΅Π½Π΅ΡΠ°ΡΠΈΠΈ ΡΠΈΠ³Π½Π°Π»Π°
delay=base/1500*sin (phi/180*pi); %ΠΠ°Π΄Π΅ΡΠΆΠΊΠ° ΠΌΠ΅ΠΆΠ΄Ρ ΠΊΠ°Π½Π°Π»Π°ΠΌΠΈ, Π² Π·Π°Π²ΠΈΡΠΈΠΌΠΎΡΡΠΈ ΠΎΡ Π½Π°ΠΏΡΠ°Π²Π»Π΅Π½ΠΈΡ Π½Π° ΡΠ΅Π»Ρ
len=length (t);
echo=zeros (10,len);
for i=1: 10
echo (i:) =sin (2*pi* (t+ (i-1) *delay) *f); %ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΡΠΈΠ³Π½Π°Π»Π° Π½Π° Π²ΡΠ΅Ρ 10 ΠΊΠ°Π½Π°Π»Π°Ρ Π°Π½ΡΠ΅Π½Π½Ρ
end;
work1_gen_one. echo. m — ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΡΡ ΠΎΡΠΈΠ³Π½Π°Π»Π° ΠΎΡ ΡΠΎΡΠ΅ΡΠ½ΠΎΠ³ΠΎ ΠΈΡΡΠΎΡΠ½ΠΈΠΊΠ° Π΄Π»ΠΈΡΠ΅Π»ΡΠ½ΠΎΡΡΡΡ t
function result = work1_gen_one_echo (t);
result=zeros (size (t));
tay=0.001; %ΠΠ»ΠΈΡΠ΅Π»ΡΠ½ΠΎΡΡΡ Π³Π΅Π½Π΅ΡΠ°ΡΠΈΠΈ ΡΠΈΠ³Π½Π°Π»Π°
for i=1: length (t)
if (t (i) >0) && (t (i)
result (i) =sin (2*pi*20 000*t (i));
end;
end;
work1_gen_1echo. m — ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΡΡ ΠΎΡΠΈΠ³Π½Π°Π»Π° Π΄Π»Ρ ΠΏΡΠ°Π²ΠΎΠ³ΠΎ ΠΈ Π»Π΅Π²ΠΎΠ³ΠΎ ΠΊΠ°Π½Π°Π»Π° Π°Π½ΡΠ΅Π½Π½Ρ ΠΎΡ ΡΠΎΡΠ΅ΡΠ½ΠΎΠ³ΠΎ ΠΈΡΡΠΎΡΠ½ΠΈΠΊΠ°
function [echol, echor] = work1_gen_1echo (r, phi);
f=20 000;
base=0.032;
tay=0.001;
Re=4;
T=1;
c=1500;
N=T*4*f;
sl=zeros (1,N);
sr=zeros (1,N);
x=r*sin (phi/180*pi);
y=r*cos (phi/180*pi);
z=sqrt (x2+y2);
psi=atan (x/y);
t1= (0: 1/ (4*f):
1) — z/c;
sig1=work1_gen_one_echo (t1);
delay=base*sin (psi) /c;
t2= (0: 1/ (4*f):
1) — z/c-delay;
sig2=work1_gen_one_echo (t2);
for j=1: N
sl (j) =sl (j) +sig1 (j);
sr (j) =sr (j) +sig2 (j);
end;
%figure (6);
%hold off;
%plot (x, y,'*');
%hold on;
%plot (0,0,'*');
echol = sl;
echor=sr;
work1_gen_echo2. m — ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΡΡ ΠΎΡΠΈΠ³Π½Π°Π»Π° Π΄Π»Ρ ΠΏΡΠ°Π²ΠΎΠ³ΠΎ ΠΈ Π»Π΅Π²ΠΎΠ³ΠΎ ΠΊΠ°Π½Π°Π»Π° Π°Π½ΡΠ΅Π½Π½Ρ ΠΎΡ ΠΏΡΠΎΡΡΠΆΠ΅Π½Π½ΠΎΠ³ΠΎ ΠΈΡΡΠΎΡΠ½ΠΈΠΊΠ°
function [echol, echor] = work1_gen_echo (r, phi, L, alpha);
f=20 000;
base=0.032;
tay=0.001;
Re=4;
T=1;
c=1500;
N=T*4*f;
sl=zeros (1,N);
sr=zeros (1,N);
for i=1: 5
Li=floor (L* (i-1) /4);
x (i) =r*sin (phi/180*pi) +Li*sin (pi/180* (phi+alpha));
y (i) =r*cos (phi/180*pi) +Li*cos (pi/180* (phi+alpha));
z=sqrt (x (i) ^2+y (i) ^2);
psi=atan (x (i) /y (i));
t1= (0: 1/ (4*f):
1) — z/c;
sig1=work1_gen_one_echo (t1);
delay=base*sin (psi) /c;
t2= (0: 1/ (4*f):
1) — z/c-delay;
sig2=work1_gen_one_echo (t2);
for j=1: N
sl (j) =sl (j) +sig1 (j);
sr (j) =sr (j) +sig2 (j);
end;
end;
%figure (5);
%hold off;
%plot (x, y,'*');
%hold on;
%plot (0,0,'*');
echol = sl;
echor = sr;
work1_gen_noise. m — ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΡΡΠΌΠΎΠ²ΠΎΠ³ΠΎ ΡΠΈΠ³Π½Π°Π»Π° Π² ΠΊΠ°Π½Π°Π»Π°Ρ Π°Π½ΡΠ΅Π½Π½Ρ
function noise = work1_gen_noise (p);
f=20 000;
T=1;
len=floor (4*f/T);
noise=zeros (1,len);
noise (1,1: len) =randn (1,len) *p;
work1_gen_randn. m — ΠΠ΅Π½Π΅ΡΠ°ΡΠΈΡ ΠΏΡΠΎΠΈΠ·Π²ΠΎΠ»ΡΠ½ΠΎ ΡΠ°ΡΠΏΠΎΠ»ΠΎΠΆΠ΅Π½Π½ΡΡ ΡΠΎΡΠ΅ΡΠ½ΡΡ ΠΈΡΡΠΎΡΠ½ΠΈΠΊΠΎΠ²
function [echol, echor] = work1_gen_randn (N1);
f=20 000;
base=0.032;
tay=0.001;
Re=4;
T=1;
c=1500;
N=T*4*f;
hl=zeros (1,N);
hr=zeros (1,N);
for j=1: N1
sl=zeros (1,N);
sr=zeros (1,N);
x=-100;
y=-100;
while ((x<=0) && (y<=0))
x=randn*400+400;
y=randn*400+400;
end;
phi=atan (x/y) *180/pi;
r=sqrt (x2+y2);
[sl, sr] = work1_gen_1echo (r, phi);
for i=1: N
hl (i) =hl (i) +sl (i);
hr (i) =hr (i) +sr (i);
end;
end;
echol=hl;
echor=hr;
work1_r. m — ΠΠ±Π½Π°ΡΡΠΆΠ΅Π½ΠΈΠ΅ ΠΏΡΠΈΠ½ΡΡΠΎΠ³ΠΎ ΡΠΈΠ³Π½Π°Π»Π° ΠΈ Π΅Π³ΠΎ ΠΏΠΎΡΠ»Π΅Π΄ΡΡΡΠ°Ρ ΠΎΠ±ΡΠ°Π±ΠΎΡΠΊΠ° Π΄Π»Ρ ΠΏΡΠΎΠΈΠ·Π²ΠΎΠ»ΡΠ½ΡΡ ΠΎΡΡΠ°ΠΆΠ°ΡΡΠΈΡ ΡΠΎΡΠ΅ΠΊ
function [Lp, Hp, Pp, Ap] = work1_r (N1,r, phi, L, alpha);
c=1500;
base=0.032;
det=zeros (1, 20);
gsnr=zeros (1, 20);
f=20 000;
T=1;
N=T*4*f;
p=0.1;
% [sl, sr] =work1_gen_echo2 (r, phi, L, alpha);
%generation random
[sl, sr] = work1_gen_randn (N1);
nl=work1_gen_noise (p);
nr=work1_gen_noise (p);
snrR=work1_snr (sr, nr, r);
sigmaR=work1_sigma (sr, nr);
A=4.8*sigmaR;
snR=sr+nr;
detect=max (abs (snR) — A);
for i=1: (4*f)
if (snR (i) — A) < 0
snR (i) =0;
end;
end;
snL=sl+nl;
for i=1: (4*f)
if (snL (i) — A) < 0
snL (i) =0;
end;
end;
hl = hilbert (sl+nl);
hr = hilbert (sr+nr);
Find=zeros (1,100);
Fphi=zeros (1,100);
nu=0;
for j=1: 100
[MaxPoint, index] =max (abs (snR) — A);
if (MaxPoint>0) && (index>80) && (index< (80 000−80))
%display (index/80 000*1500);
nu=nu+1;
la=c/f;
Find (nu) =index/80 000*1500+la/2;
snR (index-80: index+80) =0;
phase = angle (hl (index)) — angle (hr (index));
Fphi (nu) = asin (la*phase/ (2*pi*base)) *180/pi;
%display (Fphi (nu));
end;
end;
if (nu==0)
Lp=0;
Hp=0;
Pp=0;
Ap=0;
else
q=Find (1: nu);
q=sort (q);
qa=zeros (1,nu);
for i=1: nu
for j=1: nu
if (q (j) ==Find (i))
qa (j) =Fphi (i);
end;
end;
end;
for i=1: nu
Li=floor (L* (i-1) / (nu-1));
x (i) =r*sin (phi/180*pi) +Li*sin (pi/180* (phi+alpha));
y (i) =r*cos (phi/180*pi) +Li*cos (pi/180* (phi+alpha));
z (i) =sqrt (x (i) ^2+y (i) ^2);
al (i) =abs (atan (x (i) /y (i)) — qa (i) *pi/180);
pogreshnost (i) =sqrt ((z (i) — q (i) *cos (al (i))) ^2+ (q (i) *sin (al (i))) ^2);
end;
%figure (5);
%plot (x, y,'b*');
%display (pogreshnost);
X=zeros (1,nu);
Y=zeros (1,nu);
for i=1: nu
%plot (Find (i) *sin (Fphi (i) *pi/180), Find (i) *cos (Fphi (i) *pi/180),'r*');
X (i) =q (i) *sin (qa (i) *pi/180);
Y (i) =q (i) *cos (qa (i) *pi/180);
end;
A=work1_matr (X, Y, nu);
%figure (5);
%plot ((1: 200), ((1: 200) *A (1) +A (2)));
%hold on;
alphap=-atan (A (1));
bp=A (2);
SigX=0;
SigY=0;
for i=1: nu
SigX=SigX+X (i);
SigY=SigY+Y (i);
end;
Xmidle=SigX/nu;
Ymidle=SigY/nu;
Xp=zeros (1,nu);
Yp=zeros (1,nu);
for i=1: nu
Xp (i) = (X (i) — Xmidle) *cos (alphap) — (Y (i) — Ymidle) *sin (alphap);
Yp (i) = (X (i) — Xmidle) *sin (alphap) + (Y (i) — Ymidle) *cos (alphap);
end;
%for i=1: nu
% rp=sqrt ((X (i)) ^2+ (Y (i) — bp) ^2);
% psip=atan ((Y (i) — bp) / (X (i)));
% betap=psip-alphap;
% Xp (i) =rp*cos (betap);
% Yp (i) =rp*sin (betap);
% end;
%figure (1); hold off;
%plot (Xp, Yp,'*', [min (Xp) max (Xp)], [0 0]);
Lp=real (max (Xp) — min (Xp));
Hp=real (max (Yp) — min (Yp));
Pp=real (sqrt (Xmidle2+Ymidle2));
Ap=real (alphap);
end;
%display (Lp);
%display (Hp);
%plot (gsnr, det);
%plot (sn);
%hold on;
%plot (1: 80 000, A);
%hold off;
%r=100;
%phi=30;
% [sl, sr] =work1_gen_1echo (r, phi);
%N1=20;
% [echol, echor] = work1_gen_randn (N1);
work1. m — ΠΠ±Π½Π°ΡΡΠΆΠ΅Π½ΠΈΠ΅ ΠΏΡΠΈΠ½ΡΡΠΎΠ³ΠΎ ΡΠΈΠ³Π½Π°Π»Π° ΠΈ Π΅Π³ΠΎ ΠΏΠΎΡΠ»Π΅Π΄ΡΡΡΠ°Ρ ΠΎΠ±ΡΠ°Π±ΠΎΡΠΊΠ° Π΄Π»Ρ Π»ΠΈΠ½Π΅ΠΉΠ½ΡΡ ΠΎΡΡΠ°ΠΆΠ°ΡΡΠΈΡ ΡΠΎΡΠ΅ΠΊ
function [Lp, Hp, Pp, Ap, Np] = work1 (r, phi, L, alpha, p);
c=1500;
base=0.032;
det=zeros (1, 20);
gsnr=zeros (1, 20);
f=20 000;
T=1;
N=T*4*f;
[sl, sr] =work1_gen_echo2 (r, phi, L, alpha);
%generation random
N1=20;
% [sl, sr] = work1_gen_randn (N1);
nl=work1_gen_noise (p);
nr=work1_gen_noise (p);
snrR=work1_snr (sr, nr, r);
sigmaR=work1_sigma (sr, nr);
A=4.8*sigmaR;
snR=sr+nr;
detect=max (abs (snR) — A);
for i=1: (4*f)
if (snR (i) — A) < 0
snR (i) =0;
end;
end;
snL=sl+nl;
for i=1: (4*f)
if (snL (i) — A) < 0
snL (i) =0;
end;
end;
hl = hilbert (sl+nl);
hr = hilbert (sr+nr);
Find=zeros (1,100);
Fphi=zeros (1,100);
nu=0;
for j=1: 100
[MaxPoint, index] =max (abs (snR) — A);
if (MaxPoint>0) && (index>80) && (index< (80 000−80))
%display (index/80 000*1500);
nu=nu+1;
la=c/f;
Find (nu) =index/80 000*1500+la/2;
snR (index-80: index+80) =0;
phase = angle (hl (index)) — angle (hr (index));
Fphi (nu) = asin (la*phase/ (2*pi*base)) *180/pi;
%display (Fphi (nu));
end;
end;
if (nu==0)
Lp=0;
Hp=0;
Pp=0;
Ap=0;
Np=0;
else
q=Find (1: nu);
q=sort (q);
qa=zeros (1,nu);
for i=1: nu
for j=1: nu
if (q (j) ==Find (i))
qa (j) =Fphi (i);
end;
end;
end;
for i=1: nu
Li=floor (L* (i-1) / (nu-1));
x (i) =r*sin (phi/180*pi) +Li*sin (pi/180* (phi+alpha));
y (i) =r*cos (phi/180*pi) +Li*cos (pi/180* (phi+alpha));
z (i) =sqrt (x (i) ^2+y (i) ^2);
al (i) =abs (atan (x (i) /y (i)) — qa (i) *pi/180);
pogreshnost (i) =sqrt ((z (i) — q (i) *cos (al (i))) ^2+ (q (i) *sin (al (i))) ^2);
end;
%figure (5);
%plot (x, y,'b*');
%display (pogreshnost);
X=zeros (1,nu);
Y=zeros (1,nu);
for i=1: nu
%plot (Find (i) *sin (Fphi (i) *pi/180), Find (i) *cos (Fphi (i) *pi/180),'r*');
X (i) =q (i) *sin (qa (i) *pi/180);
Y (i) =q (i) *cos (qa (i) *pi/180);
end;
A=work1_matr (X, Y, nu);
%figure (5);
%plot ((1: 200), ((1: 200) *A (1) +A (2)));
%hold on;
alphap=-atan (A (1));
bp=A (2);
SigX=0;
SigY=0;
for i=1: nu
SigX=SigX+X (i);
SigY=SigY+Y (i);
end;
Xmidle=SigX/nu;
Ymidle=SigY/nu;
Xp=zeros (1,nu);
Yp=zeros (1,nu);
for i=1: nu
Xp (i) = (X (i) — Xmidle) *cos (alphap) — (Y (i) — Ymidle) *sin (alphap);
Yp (i) = (X (i) — Xmidle) *sin (alphap) + (Y (i) — Ymidle) *cos (alphap);
end;
%for i=1: nu
% rp=sqrt ((X (i)) ^2+ (Y (i) — bp) ^2);
% psip=atan ((Y (i) — bp) / (X (i)));
% betap=psip-alphap;
% Xp (i) =rp*cos (betap);
% Yp (i) =rp*sin (betap);
% end;
%figure (1); hold off;
%plot (Xp, Yp,'*', [min (Xp) max (Xp)], [0 0]);
Lp=real (max (Xp) — min (Xp));
Hp=real (max (Yp) — min (Yp));
Pp=real (sqrt (Xmidle2+Ymidle2));
Ap=real (alphap);
Np=nu;
end;
%display (Lp);
%display (Hp);
%plot (gsnr, det);
%plot (sn);
%hold on;
%plot (1: 80 000, A);
%hold off;
%r=100;
%phi=30;
% [sl, sr] =work1_gen_1echo (r, phi);
%N1=20;
% [echol, echor] = work1_gen_randn (N1);
work1_sigma. m — ΠΠ°Ρ ΠΎΠΆΠ΄Π΅Π½ΠΈΠ΅ Π΄ΠΈΡΠΏΠ΅ΡΡΠΈΠΈ ΡΠΈΠ³Π½Π°Π»Π° Ρ ΡΡΠΌΠΎΠΌ
function sigma=work1_sigma (s, n);
f=20 000;
sigma=sqrt (sum ((n+s). ^2) / (4*f));
1. work1_snr. m - ΠΠ°Ρ ΠΎΠΆΠ΄Π΅Π½ΠΈΠ΅ snr ΡΠΈΠ³Π½Π°Π»Π° Ρ ΡΡΠΌΠΎΠΌ.
function snr = work1_snr (s, n, r);
f=20 000;
c=1500;
sh=floor (8*r*f/c);
sh2=floor (8* (r+15) *f/c) +floor (4*f/1000);
ps=sum (s (sh: sh2). ^2) /length (s (sh: sh2));
pn=sum (n (sh: sh2). ^2) /length (n (sh: sh2));
snr=10*log10 (ps/pn);
work1_matr. m — ΠΠ°Ρ ΠΎΠΆΠ΄Π΅Π½ΠΈΠ΅ Π°ΠΏΠΏΡΠΎΠΊΡΠΈΠΌΠ°ΡΠΈΠΈ ΠΏΠΎΠ»ΠΎΠΆΠ΅Π½ΠΈΡ Π²ΡΡΠ²Π»Π΅Π½Π½ΠΎΠ³ΠΎ ΠΏΡΠΎΡΡΠΆΠ΅Π½Π½ΠΎΠ³ΠΎ ΠΎΠ±ΡΠ΅ΠΊΡΠ°
function A = work1_matr (X, Y, nu);
A2=zeros (nu, 2);
A2t=zeros (2,nu);
Q=zeros (2,nu);
Q2=zeros (nu, 2);
A=zeros (nu, 2);
R=zeros (2,nu);
B=zeros (nu, 1);
for i=1: nu
A2 (i, 1) =X (i);
A2 (i, 2) =1;
A2t (1, i) =X (i);
A2t (2, i) =1;
B (i, 1) =Y (i);
end;
Q=A2t*A2;
Q2=inv (Q);
R=A2t*B;
A=Q2*R;
work1_main. m — Π‘ΠΎΠ·Π΄Π°Π½ΠΈΠ΅ ΠΌΠ°ΡΡΠΈΠ²Π° Π΄Π»Ρ ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΎΡΠ°, ΡΠΎΡΡΠΎΡΡΠ΅Π³ΠΎ ΠΈΠ· ΡΠ»ΡΡΠ°ΠΉΠ½ΠΎ ΡΠ°ΡΠΏΠΎΠ»ΠΎΠΆΠ΅Π½Π½ΡΡ ΠΏΡΠΎΠΈΠ·Π²ΠΎΠ»ΡΠ½ΡΡ ΠΏΡΠΎΡΡΠΆΠ΅Π½Π½ΡΡ ΠΎΠ±ΡΠ΅ΠΊΡΠΎΠ², ΡΠΎΡΠ΅ΡΠ½ΡΡ ΠΈΡΡΠΎΡΠ½ΠΈΠΊΠΎΠ² Π³ΡΡΠΏΠΏΠΎΠ²ΡΡ ΠΈ ΠΎΠ΄ΠΈΠ½ΠΎΡΠ½ΡΡ
function [P, T] = work1_main (p);
Q = [];
T = [];
Numb=5;
%p=0.1;
for KI=1: Numb
r=100+50*KI;
phi=0;
L=0;
alpha=0;
N1=0;
tr=false;
while (tr==false)
while L<=50 || L>=200 || phi<=0 || phi>=180 || alpha<=0 || alpha>=90 || N1<=0 || N1>30
L=randn*40+125;
phi=90+randn*40;
alpha=45+randn*20;
N1=floor (randn*10+15);
end;
[Lp, Hp, Pp, Ap, Np] =work1 (r, phi, L, alpha, p);
if (Lp>0) && (Hp>0) && (Pp>100)
Q = [Q; Lp Hp Pp Ap Np];
T = [T; 1];
tr=true;
else
tr=false;
end;
end;
%N1=20;
[Lp, Hp, Pp, Ap] =work1_r (N1,r, phi, L, alpha);
if Lp>0 && Hp>0 && Pp>0
Q = [Q; Lp Hp Pp Ap N1];
T = [T; 0];
end;
[Lp, Hp, Pp, Ap] =work1_r (1,r, phi, L, alpha);
if Pp>0 && Ap<=pi
Q = [Q; 0 0 Pp Ap 1];
T = [T; 0];
end;
end;
P=Q;
Klas. m — Π‘ΠΎΠ·Π΄Π°Π½ΠΈΠ΅ Π½Π΅ΠΉΡΠΎΡΠ΅ΡΠΈ Π΄Π»Ρ ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΎΡΠ°
ΠΡΠΊΡΡΡΡΠ²Π΅Π½Π½Π°Ρ Π½Π΅ΠΉΡΠΎΠ½Π½Π°Ρ ΡΠ΅ΡΡ — ΡΡΠΎ Π½Π°Π±ΠΎΡ Π½Π΅ΠΉΡΠΎΠ½ΠΎΠ², ΡΠΎΠ΅Π΄ΠΈΠ½Π΅Π½Π½ΡΡ ΠΌΠ΅ΠΆΠ΄Ρ ΡΠΎΠ±ΠΎΠΉ. ΠΠΎΠ΄Π°Π²Π°Ρ Π»ΡΠ±ΡΠ΅ ΡΠΈΡΠ»Π° Π½Π° Π²Ρ ΠΎΠ΄Ρ Π½Π΅ΠΉΡΠΎΠ½Π½ΠΎΠΉ ΡΠ΅ΡΠΈ, ΠΌΡ ΠΏΠΎΠ»ΡΡΠ°Π΅ΠΌ ΠΊΠ°ΠΊΠΎΠΉ-ΡΠΎ Π½Π°Π±ΠΎΡ ΡΠΈΡΠ΅Π» Π½Π° Π²ΡΡ ΠΎΠ΄Π°Ρ Π½Π΅ΠΉΡΠΎΠ½Π½ΠΎΠΉ ΡΠ΅ΡΠΈ. Π’Π°ΠΊΠΈΠΌ ΠΎΠ±ΡΠ°Π·ΠΎΠΌ, ΡΠ°Π±ΠΎΡΠ° Π½Π΅ΠΉΡΠΎΠ½Π½ΠΎΠΉ ΡΠ΅ΡΠΈ ΡΠΎΡΡΠΎΠΈΡ Π² ΠΏΡΠ΅ΠΎΠ±ΡΠ°Π·ΠΎΠ²Π°Π½ΠΈΠΈ Π²Ρ ΠΎΠ΄Π½ΠΎΠ³ΠΎ Π²Π΅ΠΊΡΠΎΡΠ° Π² Π²ΡΡ ΠΎΠ΄Π½ΠΎΠΉ Π²Π΅ΠΊΡΠΎΡ. ΠΡΠ°ΠΊΡΠΈΡΠ΅ΡΠΊΠΈ Π»ΡΠ±ΡΡ Π·Π°Π΄Π°ΡΡ ΠΌΠΎΠΆΠ½ΠΎ ΡΠ²Π΅ΡΡΠΈ ΠΊ Π·Π°Π΄Π°ΡΠ΅, ΡΠ΅ΡΠ°Π΅ΠΌΠΎΠΉ Π½Π΅ΠΉΡΠΎΠ½Π½ΠΎΠΉ ΡΠ΅ΡΡΡ.
%clear;
%hold off;
%angle= [pi/2: 0.1: — pi/2];
%P=cos (angle);
%T=sin (angle);
%plot (P, T, P, T,'or');
%net=newff (minmax (P), [25 1],{'tansig' 'purelin'},'trainbfg');
net = newff ([0 2000; 0 2000; 50 1000; - pi pi; 1 30], [25 1],{'tansig' 'purelin'},'trainbfg');
Y=sim (net, P');
hold off;
plot (P, Y,'og');
hold on;
net. trainParam. epochs=150;
% net. trainParam. goal=0.001;
net=train (net, P', T');
Y=sim (net, P');
plot (P, Y,'x');
Proverka_Klass. m — ΠΡΠΎΠ²Π΅ΡΠΊΠ° ΡΠ°Π±ΠΎΡΡ Π½Π΅ΠΉΡΠΎΡΠ΅ΡΠΈ ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΎΡΠ°
Promah=zeros (10,1);
for j=1: 10
p=j/10;
[P, T] = work1_main (p);
%Promah (p*10+1) =0;
%display (T');
PP=zeros (length (T), 1);
for i=1: length (T)
PP (i) =floor (sim (net, P (i:) ') +0.5);
if (PP (i) <0)
PP (i) =0;
end;
if not (PP (i) ==T (i))
Promah (j) =Promah (j) +1;
end;
end;
%display (PP);
display (Promah (j));
end;
hold off;
figure (1);
hold on;
plot ((0.1: 0.1:
1), Promah);
Π Π΅Π·ΡΠ»ΡΡΠ°ΡΡ ΡΠ°Π±ΠΎΡΡ ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΎΡΠ° ΠΌΠΎΠΆΠ½ΠΎ ΠΎΡΡΠ°Π·ΠΈΡΡ Π½Π° Π³ΡΠ°ΡΠΈΠΊΠ΅ Π·Π°Π²ΠΈΡΠΈΠΌΠΎΡΡΠΈ ΠΊΠΎΠ»ΠΈΡΠ΅ΡΡΠ²Π° ΠΎΡΠΈΠ±ΠΎΠΊ ΠΊΠ»Π°ΡΡΠΈΡΠΈΠΊΠ°ΡΠΎΡΠ° ΠΎΡ Π·Π½Π°ΡΠ΅Π½ΠΈΡ ΠΎΡΠ½ΠΎΡΠ΅Π½ΠΈΡ ΡΠΈΠ³Π½Π°Π»/ΠΏΠΎΠΌΠ΅Ρ Π°.