forum.vnstele.com

Вітруальне навчальне середовище телекомунікацій - Форум підтримки
Сьогодні: 28 березня 2024, 21:43

Часовий пояс UTC + 2 годин [ DST ]




Створити нову тему Відповісти  [ 74 повідомлень ]  На сторінку Поперед.  1, 2, 3, 4, 5, 6, 7, 8  Далі
Автор Повідомлення
ПовідомленняДодано: 24 травня 2011, 22:53 
Офлайн

З нами з: 07 лютого 2011, 13:28
Повідомлення: 8
Допоможіть будь-ласка, побудувати графік для розподілу Енгсета, і визначити кількість ліній, не можу розібратись з матлабом!


Догори
 Профіль  
 
ПовідомленняДодано: 24 травня 2011, 23:56 
Офлайн

З нами з: 09 лютого 2011, 22:58
Повідомлення: 25
Я написав в матлабі такий код:

function p=Engset(v,y,N)

Znamennyk=1;
Chyselnyk=CizNpoK (N, v).*y^v;

for k=0:v
Znamennyk = Znamennyk + dob(v,y,N);
end

p=Chyselnyk/Znamennyk;

return;
%..............................................................
function rezult = dob(v,y,N)
rezult=1;
for k=0:v
rezult=rezult*CizNpoK (N, k).*y.^k;
end
return;

% Кількість комбінацій С із N по K (Matlab)
function Comb=CizNpoK (N, k)

if N == k %Перестраховка, якщо N i k рівні
Comb=1;
return;
end

if N < k %Перестраховка, якщо N < k
Comb=NaN;
return;
end

dobutok=1;
j=1;

for i=(k+1):N
dobutok=dobutok*i/j;
j=j+1;
end
Comb=dobutok;
return;

Але чомусь програма не працює нормально , бо результат є або "0", або "NaN" . Я не знаю чому так.

P. S. Допоможіть будь ласка :roll: .


Догори
 Профіль  
 
ПовідомленняДодано: 25 травня 2011, 04:42 
Офлайн

З нами з: 09 лютого 2011, 22:58
Повідомлення: 25
І ше питання: я пишу такий код в матлабі:

function p=ber(N,i,y)
p=CizNpoK (N, i).*(y.^i).*(1-y).^(N-i);
return;

N=1070;
y=0.115;
for i=1:100
plot(i,ber(N,i,y))
end

І мені не хоче матлаб будувати графіка( то для розподілу Бернуллі).
Підкажіть будь ласка , де я помилився.


Догори
 Профіль  
 
ПовідомленняДодано: 25 травня 2011, 09:08 
Офлайн
Адміністратор сайту

З нами з: 11 січня 2011, 15:00
Повідомлення: 181
Звідки: Львів
vasylivandriy написав:
І ше питання: я пишу такий код в матлабі:

Код:
function p=ber(N,i,y)
p=CizNpoK (N, i).*(y.^i).*(1-y).^(N-i);
return;


Найпростіший вихід із ситуації - змодифікувати код наступним чином:

Код:
N=1070;
y=0.115;

f=figure;
hold on;
for i=1:100
  plot(i,ber(N,i,y))
end


Хоча краще зробити наступним чином (фрагмент коду будує розподіл Бернуллі при заданих кількості джерел і інтенсивності навантаження від одного джерела):
Код:
N=1070;
y=0.115;

for i=1:N
    x_axe(i)=i;
    p_i(i)= CizNpoK (N, i)*(y^i)*(1-y)^(N-i);
end
f=figure;
plot(x_axe, p_i);


Догори
 Профіль  
 
ПовідомленняДодано: 25 травня 2011, 09:10 
Офлайн
Адміністратор сайту

З нами з: 11 січня 2011, 15:00
Повідомлення: 181
Звідки: Львів
3a6aBa написав:
Допоможіть будь-ласка, побудувати графік для розподілу Енгсета, і визначити кількість ліній, не можу розібратись з матлабом!

Давайте вихідні дані, допоможу :D

А для мого варіанту, наприклад - ось такий код:
Код:
% Побудова графіків за ф-лами Ерланга і Енгсета

Y=3.43;
N=9;
pb=0.02;

vv=[];
Erl=[];
Eng=[];
p_B=[];

for v=5:N+3
    vv=[vv;v];
    Erl=[Erl; Erlang1(v, Y)];
    Eng=[Eng; Engset1(v, N, Y)];
    p_B=[p_B; pb];
end

f=figure;
plot(vv, Erl, 'or', 'LineWidth',1);
hold on;
plot(vv, Eng, '^b', 'LineWidth',1);
plot(vv, p_B, 'g', 'LineWidth',1);
legend1 = legend({'Формула Ерланга','Формула Енгсета','Задана імовірність блокування'},'EdgeColor',[1 1 1]);

plot(vv, Erl, 'r', 'LineWidth',1);
plot(vv, Eng, 'b', 'LineWidth',1);

xlabel('v, кількість ліній');
ylabel('Імовірність блокування');

Результат роботи:
Приєднання файлів:
ErlE.png
ErlE.png [ 5.63 Кб | Переглянуто 1464 разів ]

Вам залишилося реалізувати функції обчислення імовірності блокування за першою формулою Ерланга і формулою Енгсета.


Догори
 Профіль  
 
ПовідомленняДодано: 25 травня 2011, 09:25 
Офлайн

З нами з: 07 лютого 2011, 13:28
Повідомлення: 8
echern написав:
3a6aBa написав:
Допоможіть будь-ласка, побудувати графік для розподілу Енгсета, і визначити кількість ліній, не можу розібратись з матлабом!

Давайте вихідні дані, допоможу :D

N=600 y=0.255


Догори
 Профіль  
 
ПовідомленняДодано: 25 травня 2011, 09:42 
Офлайн
Адміністратор сайту

З нами з: 11 січня 2011, 15:00
Повідомлення: 181
Звідки: Львів
Цитата:
N=600 y=0.255

Зроблено для вимоги що до імовірності блокування, рівній 0,2.
Приєднання файлів:
Zab1.png
Zab1.png [ 6.82 Кб | Переглянуто 1464 разів ]


Догори
 Профіль  
 
ПовідомленняДодано: 03 червня 2011, 01:38 
Офлайн
Аватар користувача

З нами з: 23 лютого 2011, 03:08
Повідомлення: 24
Звідки: Камянка-Бузька,Львів
функціональна програма для 1,2 ф-ли Ерланга. Особливість те, що можна за будь-якими із двох параметрів визначити третій. Тобто швидше можна підібрати потрібну к-сть ліній, або ймов. втрат(ну то залежно від пункту завдання)


Приєднані файли:
Erlang_rus.rar [14.01 Кб]
Завантажено 406 разів

_________________
Volodya Rykhva thinks so....
Зображення
Догори
 Профіль  
 
 Тема повідомлення: 4.3
ПовідомленняДодано: 04 червня 2011, 20:25 
Офлайн

З нами з: 18 лютого 2011, 18:32
Повідомлення: 10
скажіть будь ласка в 34 варіанті в пункті :"Розрахунок дволанкових комутаційних систем(Розрахунок методом ймовірнісних графів)" може бути така к-сть ліній?


Приєднані файли:
Безымянный.jpg
Безымянный.jpg [ 71.09 Кб | Переглянуто 1441 разів ]
Догори
 Профіль  
 
ПовідомленняДодано: 04 червня 2011, 20:51 
Офлайн
Адміністратор сайту

З нами з: 11 січня 2011, 15:00
Повідомлення: 181
Звідки: Львів
Може бути і така кількість, на захисті курсової перевіримо більш детально ;)


Догори
 Профіль  
 
Відображати повідомлення за:  Сортувати за  
Створити нову тему Відповісти  [ 74 повідомлень ]  На сторінку Поперед.  1, 2, 3, 4, 5, 6, 7, 8  Далі

Часовий пояс UTC + 2 годин [ DST ]


Хто зараз онлайн

Зараз переглядають цей форум: Немає зареєстрованих користувачів і 1 гість


Ви не можете створювати нові теми у цьому форумі
Ви не можете відповідати на теми у цьому форумі
Ви не можете редагувати ваші повідомлення у цьому форумі
Ви не можете видаляти ваші повідомлення у цьому форумі
Ви не можете додавати файли у цьому форумі

Знайти:
Вперед:  
cron
POWERED_BY
Український переклад © 2005-2010 Українська підтримка phpBB