Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ### 1. Vysvetlite pojmy: opravovaný objekt, neopravovaný objekt, doba technického
- života, bezporuchovosť. ###
- Opravovateľný objekt:
- - Objekt, ktorý sa po poruche opraví a vráti do prevádzky
- - Príklad: výrobný stroj
- Po vzniku poruchy sa objekt opravuje. Jeho prevádzka je charakterizovaná tokom po sebe nasledujúcich porúch a opráv, až kým nenastane medzný stav.
- Neopravovateľný objekt:
- - Objekt, ktorý sa po poruche neopravuje
- - Príklad: elektronická súčiastka
- Objekt sa po vzniku poruchy neopravuje. Doba do prvej poruchy je súčasne doba do dosiahnutia medzného stavu.
- Doba technického života:
- - Čas, počas ktorého je intenzita porúch prijateľná
- - Príklad: životnosť ložiska
- Doba do okamihu, kedy intenzita porúch sa stáva neprijateľnou alebo objekt je už neopraviteľný v daných podmienkach.
- Bezporuchovosť (Reliability):
- - Pravdepodobnosť bezporuchovej prevádzky
- - Príklad: PC fungujúci 10 000 hodín
- Schopnosť objektu plniť nepretržite požadovanú funkciu v daných podmienkach a v danom časovom intervale. Bezporuchovosť je pravdepodobnosť, že objekt je funkčný. Objekty sa po poruchách neobnovujú.
- ### 2. Charakterizujte metódy riešenia komplexných systémov – metódu
- dekompozície alebo minimálnych ciest alebo kritických rezov. ###
- Metóda minimálnych ciest:
- Cesta je taká množina podsystémov, pre ktorú je systém ako celok funkčný, pokiaľ všetky podsystémy na uvažovanej ceste sú funkčné. Minimálna cesta je taká množina, kde po poruche ktoréhokoľvek prvku sa systém stane nefunkčným.
- 1. Nájdeme všetky minimálne cesty
- 2. Modelujeme ako sériové zapojenie
- 3. Celý systém = paralelné zapojenie ciest
- Vzorec: R_S = P(C1 ∪ C2 ∪ ... ∪ Ck)
- Metóda kritických rezov:
- Minimálny kritický rez je súbor prvkov, ktorého porucha spôsobí poruchu systému, ale ak sa ktorýkoľvek prvok neporuší, systém funguje.
- 1. Nájdeme kritické rezy
- 2. Každý rez = paralelné zapojenie
- 3. Celý systém = sériové zapojenie rezov
- Vzorec: R_S = ∏[1 - ∏(1 - r_j)]
- Metóda dekompozície:
- Analyzuje sa systém podľa kľúčového prvku, rozkladajúc ho na dva prípady: s funkčným a nefunkčným kľúčovým prvkom.
- Rozklad podľa kľúčového prvku:
- R_S = R(S|A)*r_A + R(S|¬A)*(1-r_A)
- ### 3. Zakreslite zovšeobecnenú schému pre zálohovanie systému po súčiastkach
- (alebo celého systému) a napíšte vzťah pre určenie bezporuchovosti systému
- pre prípad úplne identických prvkov/blokov. ###
- Zálohovanie po súčiastkach:
- Schéma:
- IN --[r1]--[r2]-- OUT
- |
- [r3]--[r4]
- Vzorec pre identické prvky:
- R_S = [1 - (1 - r)^n]^k
- Zálohovanie celého systému:
- Vzorec:
- R_S = 1 - (1 - r^k)^n
- ### 4. Vysvetlite pojmy stredná hodnota, medián a kvantily rozdelení
- pravdepodobnosti porúch v kontexte teórie spoľahlivosi ###
- Stredná hodnota:
- Hodnota, ktorú objekty prežijú s pravdepodobnosťou 50%.
- - Priemerná doba do poruchy
- - Pre exp. rozdelenie: T_str = 1/λ
- Medián:
- Stred celého rozdelenia, okolo ktorého kolísajú hodnoty.
- - Doba so 50% pravdepodobnosťou poruchy
- - Pre exp. rozdelenie: t_med = ln(2)/λ
- Kvantily:
- Hodnota náhodnej premennej zodpovedajúca dopredu zvolenej hodnote distribučnej funkcie.
- - B10: čas pre 10% porúch
- - L10: čas pre 90% prežitia
- ### 5. Definujte čiastkové ukazovatele spoľahlivosti – RAMS ###
- R - Bezporuchovosť:
- Schopnosť plniť funkciu bez porúch.
- A - Pohotovosť:
- Schopnosť byť v stave plnenia funkcie.
- M - Udržiavateľnosť:
- Schopnosť podliehať opravám.
- S - Bezpečnosť:
- Neprítomnosť neprípustného rizika.
- ### 6. Napíšte všeobecnú definíciu spoľahlivosti ###
- Spoľahlivosť je schopnosť objektu plniť požadované funkcie pri zachovaní stanovených ukazovateľov počas predpísanej doby.
- Podľa STN 01 01 02:
- Schopnosť plniť funkcie pri zachovaní parametrov počas predpisanej doby prevádzky.
- ### 7. Nakreslite Markovov graf (graf prechodov) pre jednu súčiastku (zariadenie), ktorá je opravovaná. Napíšte, ako nazývame všetky parametre zakreslené v grafe. Spravte pravdepodobnostnú analýzu. Obdobná otázka pre opraviteľný paralelný systém
- (systém s toleranciou úplnej poruchy, systém bez tolerancie úplnej poruchy). ###
- Parametre
- λ: Intenzita porúch (prechod z funkčného do nefunkčného stavu)
- μ: Intenzita opráv (prechod z nefunkčného do funkčného stavu)
- Pre 1 suciastku opravovanu
- Stavy:
- 0 - funkčný
- 1 - nefunkčný
- Graf prechodov:
- 0 --λ--> 1
- 1 --μ--> 0
- Kolmogorovove diferenciálne rovnice
- dP0/dt = -λP0 + μP1
- dP1/dt = λP0 - μP1
- Riešenie pre ustálený stav (dP/dt=0):
- P0 = μ/(λ+μ) [pohotovosť]
- P1 = λ/(λ+μ) [nepohotovosť]
- Paralelný systém s 2 prvkami
- Stavy:
- 0 - oba prvky funkčné
- 1 - jeden prvok funkčný, druhý v oprave
- 2 - oba prvky nefunkčné (absorbčný stav)
- Diferenciálne rovnice:
- dP0/dt = -2λP0 + μP1
- dP1/dt = 2λP0 - (λ+μ)P1
- dP2/dt = λP1
- Riesenie
- P0 = μ²/(2λ²+2λμ+μ²)
- P1 = 2λμ/(2λ²+2λμ+μ²)
- P2 = 2λ²/(2λ²+2λμ+μ²)
- ### 8. Formulujte základné predpoklady riešenia Markovovových procesov: ###
- 1. pravdepodobnosť prechodu systému z niektorého stavu i do stavu j počas
- intervalu dĺžky delta t je daná súčinom lambda_ij * delta t
- 2. uvažované udalosti vedúce k prechodom medzi stavmi systému sú vzájomne
- nezávislé
- 3. pravdepodobnosť súčasného výskytu dvoch a viacerých udalostí v intervale delta t je zanedbateľná
- ### 9. Charakterizujte tzv. vaňovú krivku. Napíšte, ktoré štádia vaňovej krivky možno opísať nasledujúcimi rozdeleniami pravdepodobnosti náhodných veličín:
- exponenciálnym, normálovým, Weibullovým. ###
- 1. Štádium zábehu:
- - Vysoká poruchovosť
- - Weibull s α < 1
- 2. Normálna prevádzka:
- - Konštantná poruchovosť (alfa = 1)
- - Exponenciálne rozdelenie alebo Weibull
- 3. Opotrebovanie:
- - Rastúca poruchovosť
- - Weibull s α > 1
- ### 10. Napíšte základné vzťahy pre určenie bezporuchovosti systému , ak sú bloky
- usporiadané paralelne alebo sériovo. ###
- Sériové zapojenie:
- R_S = ∏ r_i
- Paralelné zapojenie:
- R_S = 1 - ∏(1 - r_i)
- ### 11. Charakterizujte vlastnosti distribučnej funkcie funkcie F(t) ###
- 1. 0 ≤ F(t) ≤ 1
- 2. Neklesajúca
- 3. lim F(t) = 0 (t→-∞), 1 (t→+∞)
- 4. Spojitá sprava
- ### 12. Charakterizujte vlastnosti funkcie bezporuchovosti R(t) ###
- 1. R(t) = 1 - F(t)
- 2. R(0) = 1, R(∞) = 0
- 3. Nerastúca
- 4. Pre exp. rozd.: R(t) = e^(-λt)
- ### 13. Napíšte aké sú typy parametrov pri pravdepodobnostných rozdeleniach. ###
- 1. Parameter škály:
- Všetky rozdelenia doby života majú tento parameter
- Jediný parameter pri jednoparametrických rozdeleniach
- Príklady:
- Exponenciálne rozdelenie: λ (intenzita porúch)
- Normálne rozdelenie: σ² (rozptyl)
- 2. Parameter tvaru:
- Definuje charakteristický tvar rozdelenia
- Najvýraznejšie ovplyvňuje priebeh f(t) a λ(t)
- Niektoré rozdelenia ho nemajú (napr. normálne, exponenciálne)
- Príklad: Weibullovo rozdelenie - parameter tvaru α
- 3. Parameter polohy:
- Posúva celé rozdelenie pozdĺž osi času
- Pre životnostné rozdelenia: predstavuje prah (minimálnu dobu pred poruchou)
- Príklady:
- Normálne rozdelenie: μ (stredná hodnota)
- Weibullovo rozdelenie: γ (parameter posunu)
- Kľúčové vlastnosti:
- Parameter škály: ovplyvňuje "rozptyl" hodnôt
- Parameter tvaru: mení tvar krivky (symetria, špicatosť)
- Parameter polohy: posúva rozdelenie bez zmeny tvaru
- Príklad pre Weibullovo rozdelenie:
- Škály: η (charakteristická životnosť)
- Tvaru: α (tvar krivky)
- Polohy: γ (doba do prvého možného zlyhania)
- ### 14. Charakterizujte princíp riešenia bezporuchovosti systémov s čiastočnou rezervou „k z n“. ###
- Ked riesime napr. 2/3 musia byt funkcne musime zistit vsetky moznosti napriklad alt1-alt4
- pri prvej su vsetky systemy funkcne (r1*r2*r3) pri ostatnych jeden poruchovy (1-r1) *r2*r3
- Systém k z n:
- Systém pozostáva z n prvkov, z ktorých musí byť aspoň k funkčných, aby celý systém fungoval.
- Príklad: 2 z 3 (TMR – Triple Modular Redundancy).
- Vzorec pre identické prvky:
- R_S = sum_{i=k}^{n} (n nad i) * r^i * (1-r)^{n-i}
- R_S = 3r^2 - 2r^3
- Aplikácia:
- Používa sa v kritických systémoch, kde je potrebná vysoká spoľahlivosť (napr. letectvo, jadrové elektrárne).
- ### 15. Napíšte Kolmogorove diferenciálne rovnice. Opíšte, čo predstavujú jednotlivé členy v nich ###
- rovnica:
- P_i(t+Δt) = (1 - Σ_{j=0,j≠i}^N λ_ij Δt) P_i(t) + Σ_{j=0,j≠i}^N λ_ji Δt P_j(t)
- Záporný člen - opisuje úbytok pravdepodobnosti stavu i v dôsledku prechodov do iných stavov. (Strata pravdepodobnosti funkčného stavu kvôli poruche.)
- Kladný člen - Popisuje prírastok pravdepodobnosti stavu i v dôsledku prechodov z iných stavov. (Zisk pravdepodobnosti funkčného stavu vďaka oprave.)
- ---------------------------------------
- Matlab
- S_A
- % 1) weibull
- clear all
- clc
- b = 4 % parameter škály
- a = 1000 % b - parametre tvaru
- % a)
- F = wblcdf(1500, a, b) % do 1500h
- R = 1 - F % bezporuchovosti
- f = wblpdf(1500,a,b)
- L = f./R % intezita poruch
- % b)
- Tkvantil=wblinv(0.5,a,b)
- % c)
- t = 0:200:2000
- F = wblcdf(t,a,b)
- R = 1 - F
- plot(t,F)
- title('F(t)')
- xlabel('t')
- ylabel('R(t)')
- legend('R')
- plot(t,R)
- title('R(t)')
- xlabel('t')
- ylabel('R(t)')
- legend('R')
- % 2) podsys evaluacia
- % Príklad 2: Určenie najvplyvnejšieho podsystému
- clear all
- clc
- format short
- % Spoľahlivosti podsystémov
- L1 = 0.98
- L23 = 0.97
- L4 = 0.99
- syms r1 r2 r3 r4 t r
- % Výpočet bezporuchovosti systému
- Rs_paralel = 1 - (1 - r2) * (1 - r3) % paralelná časť (r2 || r3)
- Rs1 = r1 * Rs_paralel
- Rs = Rs1 * r4 % celý systém
- % Parciálne derivácie podľa každého podsystému
- C_l1 = diff(Rs, r1);
- C_l2 = diff(Rs, r2);
- C_l3 = diff(Rs, r3);
- C_l4 = diff(Rs, r4);
- % Dosadenie hodnôt spoľahlivostí
- C_r1 = subs(C_l1,{r1 r2 r3 r4 },{r r r r})
- C_r2 = subs(C_l2,{r1 r2 r3 r4 },{r r r r})
- C_r3 = subs(C_l3,{r1 r2 r3 r4 },{r r r r})
- C_r4 = subs(C_l4,{r1 r2 r3 r4 },{r r r r})
- % Výpis výsledkov
- C_rr1=eval(subs(C_r1,{r},{L1}))
- C_rr2=eval(subs(C_r2,{r},{L23}))
- C_rr3=eval(subs(C_r3,{r},{L23}))
- C_rr4=eval(subs(C_r4,{r},{L4}))
- % 3)
- % Príklad 3: Určenie asymptotickej pohotovosti a nepohotovosti opravovaného systému
- clear all
- syms t P0(t) lambda P1(t) mu
- lambda_const = 9
- mu_const = 0.5
- % Kolmogorovove diferenciálne rovnice
- rov1 = diff(P0,t) == -lambda*P0 + mu*P1 % dP0/dt = -λP0 + μP1
- rov2 = diff(P1,t) == lambda*P0 - mu*P1 % dP1/dt = λP0 - μP1
- % Začiatočné podmienky: P0(0) = 1, P1(0) = 0
- cond1 = P0(0) == 1
- cond2 = P1(0) == 0
- % Riešenie sústavy diferenciálnych rovníc
- [P0, P1] = dsolve(rov1, rov2, cond1, cond2)
- % Dosadenie hodnôt λ = 0.9, μ = 0.5
- P00 = subs(P0, {lambda mu}, {lambda_const mu_const})
- P11 = subs(P1, {lambda mu}, {lambda_const mu_const})
- Aasymp = subs(P00, {t}, {Inf})
- Uasymp = subs(P11, {t}, {Inf})
- t=[0:10]
- ezplot(P00,t)
- title('pohotovosť systému')
- ezplot(P11,t)
- title('nepohotovosť systému')
- S_E
- % 1) weibull
- clear all
- clc
- % a) pravdepodobnost poruchy
- a = 1.6
- b = 55
- F = wblcdf(30, a, b) % do 30 c.j. - pravd poruchy
- % b) Stredna doba do poruchy
- [Tstr,rozptyl]=wblstat(a,b)
- % c) hustota poruch
- t = 0:10:200
- f = wblpdf(t,b,a);
- plot(t,f)
- title('f(t)')
- xlabel('t')
- ylabel('f(t)')
- legend('f','Location','Best')
- % 2) dekompozicia
- clear all
- syms a b c d e r t
- % dekomp
- Rs_Afunk = a * ((1 - (1 - b) * (1 - e)) * (1 - (1 - d) * (1 - c)))
- Rs_ANefunk = e * c * (1 - a)
- Rs = Rs_ANefunk * Rs_Afunk
- Rss = expand(Rs)
- Rs_r = subs(Rss, {a b c d e}, {r r r r r})
- lambda = 1
- % a) bezporuchovost
- Rs_final = subs(Rs_r,{r},{exp(-lambda*r)})
- % b) stredna
- Tstr=int(Rs_final,t,0,Inf)
- % c) intezita poruch
- tt = 0:1:10
- f=-diff(Rs_final,r) % funkcia hustoty rozdelenia pravdepodobnosti
- FIP=simplify(f/Rs_final) % funkcia intenzity porúch
- ezplot(FIP,tt)
- title('intenzita f(t) ')
- % 3) markove procesy
- syms lambda mu P0(t) P1(t) P2(t) P3(t)
- % Kolmogorovove rovnice pre ustálený stav
- rov1 = diff(P0,t)==-3 * lambda * P0 + mu * P1 + mu * P2 + mu * P3
- rov2 = diff(P1,t)==lambda * P0 - mu * P1
- rov3 = diff(P2,t)==lambda * P0 - mu * P2
- rov4 = diff(P3,t)==lambda * P0 - mu * P3
- cond1=P0(0)==1
- cond2=P1(0)==1
- cond3=P2(0)==1
- cond4=P3(0)==0
- % Riešenie sústavy
- [P0, P1, P2, P3]=dsolve(rov1,rov2,rov3,rov4,cond1,cond2,cond3,cond4)
- % Dosadenie hodnôt lambda = 0.5, mu = 2
- lambda_const = 0.5
- mu_const = 2
- P00 = subs(P0, {lambda mu}, {lambda_const mu_const})
- P11 = subs(P1, {lambda mu}, {lambda_const mu_const})
- Aasymp = subs(P00, {t}, {Inf})
- Uasymp = subs(P11, {t}, {Inf})
- t=[0:10]
- ezplot(P00,t)
- title('pohotovosť systému')
- ezplot(P11,t)
- title('nepohotovosť systému')
- S_F
- % 1) weibull
- clear all
- clc
- % a) pravd poruch
- a = 0.9
- b = 900
- F = wblcdf(1200, a, b) % do 1200 c.j.
- % b)
- Tkvantil=wblinv(0.9,a,b)
- % c)
- t = 0:200:2000
- F = wblcdf(t, b, a) % do 1500h
- R = 1 - F % bezporuchovosti
- f = wblpdf(t, b ,a)
- L = f./R % intezita poruch
- plot(t,L)
- title('L(t)')
- xlabel('t')
- ylabel('L(t)')
- legend('L','Location','Best')
- % 2) podsys
- lambda = 0.5
- syms r1 r2 r3 r4 r5 r
- Rs1 = ( 1 - ((1 - (1 - r1) * (1 - r2)) * (1 - (1 - r3) * (1 - r4))))
- Rs = Rs1 * r5
- Rs = expand (Rs)
- Rs_r = subs(Rs, {r1 r2 r3 r4 r5}, {r r r r r})
- % a) bezp
- Rs_final = subs(Rs_r,{r},{exp(-lambda*r)})
- % b) str
- Tstr=int(Rs_final,t,0,Inf)
- % c) pravd poruch
- F = 1 - Rs_final
- tt = 0:1:20
- ezplot(F,tt)
- title('prav poruch F(t) ')
- % 3) markove procesy
- syms lambda mu P0(t) P1(t) P2(t)
- % Kolmogorovove rovnice pre ustálený stav
- rov1 = diff(P0,t)==-2 * lambda * P0 + mu * P1 + mu * P2
- rov2 = diff(P1,t)==lambda * P0 - mu * P1
- rov3 = diff(P2,t)==lambda * P0 - mu * P2
- cond1=P0(0)==1
- cond2=P1(0)==1
- cond3=P2(0)==1
- % Riešenie sústavy
- [P0, P1, P2]=dsolve(rov1,rov2,rov3,cond1,cond2,cond3)
- % Dosadenie hodnôt lambda = 0.5, mu = 2
- lambda_const = 0.5
- mu_const = 2
- P00 = subs(P0, {lambda mu}, {lambda_const mu_const})
- P11 = subs(P1, {lambda mu}, {lambda_const mu_const})
- Aasymp = subs(P00, {t}, {Inf})
- Uasymp = subs(P11, {t}, {Inf})
- t=[0:10]
- ezplot(P00,t)
- title('pohotovosť systému')
- ezplot(P11,t)
- title('nepohotovosť systému')
- =============%
- T_A
- % priklad 1 weibull
- % a)
- beta = 1.45
- alfa = 76.33
- %[Tstr,rozptyl]=wblstat(alfa,beta) % urcenie Tstr ked mame alfa,beta a nie
- %lambda
- Fx = wblcdf(40, alfa, beta) % do 40 min
- % b) neviem
- Fx = wblcdf(60, alfa, beta)
- Rx = 1 - Fx % po 60 min, prezitie
- % c) neviem
- x = wblinv(0.2,alfa,beta)
- % d) neviem
- f=wblpdf(t,alfa,beta);
- F=wblcdf(t,alfa,beta);
- R=1-F;
- L=f./R;
- plot(t,L)
- title('Woooo')
- % priklad 2 exp
- % a)
- data = [260 380 295 310 340 425 600 490]
- Tstr=expfit(data) % výpočet odhadu Tstr
- lambda=1/Tstr % výpočet lambda
- % b)
- t = 0:50:1000
- F=expcdf(t,1/lambda)
- plot(t,F)
- title('funkcia pravdepodobnosti poruchy')
- xlabel('t')
- ylabel('F(t)')
- legend('F')
- R= 1 - F
- plot(t,R)
- title('pravdepodobnostná funkcia bezporuchovosti')
- xlabel('t')
- ylabel('R(t)')
- legend('R')
- % priklad 3 podsys
- clear all
- syms r1 r2 r3 r4 r5 r t
- % a)
- alt1=r1*r2*r3*r4
- alt2=(1-r1)*r2*r3*r4
- alt3=r1*(1-r2)*r3*r4
- alt4=r1*r2*(1-r3)*r4
- alt5=r1*r2*r3*(1-r4)
- P3z4=alt1+alt2+alt3+alt4+alt5
- Rs1=expand(P3z4*r5)
- Rs2=subs(Rs1,{r1 r2 r3 r4 r5},{r r r r r})
- % b)
- lambda = 1
- Rs=subs(Rs2,{r},{exp(-lambda*t)})
- Tstr=int(Rs,t,0,Inf)
- % F_Tstr=eval(tu napis rovnicu matematicky co ti vysla z Rs)
- % 4. priklad minimalne cesty
- clear all
- syms a b c d e r
- % a)
- Rs = expand(1 - (1 - a * c * e) * (1 - b * c * e) * (1 - b * d * e))
- RsMC_idem=subs(Rs,{a^2 b^2 c^2 d^2 e^2},{a b c d e})
- RsMC_r=subs(RsMC_idem,{a b c d e},{r r r r r})
- % b)
- Rs=subs(RsMC_r,{r},{exp(-0.02*r)}) % funkcia bezporuchovosti
- f=-diff(Rs,r) % funkcia hustoty rozdelenia pravdepodobnosti
- FIP=simplify(f/Rs) % funkcia intenzity porúch
- t=0:10:100;
- ezplot(FIP,t)
- title('pravdepodobnosti pre Rs(t) ')
- T_B
- % priklad 1 exp
- % a)
- lambda = 0.05
- Tstr = 1 / lambda
- Fx = expcdf(40, 1 / lambda) % do 40 min
- %Rx = 1 - Fx % po 40 min
- % b)
- F_str = expcdf(Tstr, 1 / lambda)
- R_str = 1 - F_str % odpoved toto je po strednej dobe
- % c)
- gama = 0.8
- Tgg= expinv(( 1 - gama ), 1 / lambda) % tento vzorec je v tahaku
- % d)
- t=[0:5:30]
- Fx = expcdf(t, 1 / lambda)
- fx = 1 - Fx
- plot(t,Fx)
- title('dist Fx')
- xlabel('t')
- ylabel('F(t)')
- legend('Fx')
- plot(t,fx)
- title('bezpouch fx')
- xlabel('t')
- ylabel('f(t)')
- legend('fx')
- % priklad 2 weibul
- % a)
- data = [16 75 34 53 120 93]
- parametre=wblfit(data)
- alfa=parametre(2)
- beta=parametre(1)
- [Tstr rozptyl]=wblstat(beta,alfa)
- % b)
- t = 0:20:200
- F=wblcdf(t,beta,alfa)
- R = 1 - F
- plot(t,R)
- title('R(t)')
- xlabel('t')
- ylabel('R(t)')
- legend('R','Location','Best')
- % priklad 3 podsys
- % a)
- clear all
- syms r1 r2 r3 r4 r t
- alt1=r2*r3*r4
- alt2=(1-r2)*r3*r4
- alt3=r2*(1-r3)*r4
- alt4=r2*r3*(1-r4)
- P2z3=alt1+alt2+alt3+alt4
- Rs1=expand(1- (1- r1)* (1 -P2z3))
- Rs2=subs(Rs1,{r1 r2 r3 r4},{r r r r})
- % b)
- lambda = 1
- Rs=subs(Rs2,{r},{exp(-lambda*t)})
- Tstr=int(Rs,t,0,Inf)
- % F_Tstr=eval(tu napis rovnicu matematicky co ti vysla z Rs)
- % 4. priklad minimalne cesty
- clear all
- syms a b c d e r
- % a)
- Rs = expand(1 - (1 - a * d) * (1 - a * b * c) * (1 - e * c))
- RsMC_idem=subs(Rs,{a^2 b^2 c^2 d^2 e^2},{a b c d e})
- RsMC_r=subs(RsMC_idem,{a b c d e},{r r r r r})
- % b)
- Rs=subs(RsMC_r,{r},{exp(-1*r)}) % funkcia bezporuchovosti
- f=-diff(Rs,r) % funkcia hustoty rozdelenia pravdepodobnosti
- FIP=simplify(f/Rs) % funkcia intenzity porúch
- t=0:10;
- ezplot(FIP,t)
- title('pravdepodobnosti pre Rs(t) ')
- T_C
- % priklad 1 exp
- % a)
- lambda = 0.09
- Tstr = 1 / lambda
- Fx = expcdf(Tstr, 1 / lambda) % do 40 min
- Rx = 1 - Fx % po 40 min % odpoved
- % b)
- q = 0.5
- tq = -log(1-q)/lambda
- % c) tento priklad nechapem
- nejakahodnota1 = 0.04
- nejakahodnota2 = 0.96
- ta = -log(1-nejakahodnota1)/lambda
- tb = -log(1-nejakahodnota2)/lambda
- % d)
- t = 0:2:20
- F=expcdf(t,1/lambda)
- plot(t,F)
- title('funkcia pravdepodobnosti poruchy')
- xlabel('t')
- ylabel('F(t)')
- legend('F')
- f=exppdf(t,1/lambda)
- plot(t,f)
- title('funkcia hustoty pravdepodobnosti rozdelenia')
- xlabel('t')
- ylabel('f(t)')
- legend('f1')
- % priklad 2 weibul
- % a)
- data = [0.102 0.126 0.185 0.206 0.233 0.247 0.249 0.251 0.258]
- parametre=wblfit(data)
- alfa=parametre(2)
- beta=parametre(1)
- [Tstr rozptyl]=wblstat(beta,alfa)
- % b)
- hodnasec = 0.05*60*60
- t = 0:0.6:hodnasec
- F=wblcdf(t,alfa,beta)
- R = 1 - F
- plot(t,F)
- title('F(t)')
- xlabel('t')
- ylabel('F(t)')
- legend('F','Location','Best')
- % priklad 3 podsys
- clear all
- syms r1 r2 r3 r4 r t lambda
- % a)
- r23=(1-(1-r2)*(1-r3))
- r123 = (1 - (1-r1) * (1 - r23))
- R = expand(r123 * r4)
- Rr=subs(R,{r1 r2 r3 r4},{r r r r })
- % b)
- Rt=subs(Rr,{r },{exp(-lambda*t)})
- assume(lambda>0) % príkaz slúži na upresnenie výpočtu neurčitého integrálu,
- Tstr=int(Rt,t,0,Inf) % riešenie nevlastného integrálu podľa t, Inf = nekonečno
- % 4. priklad minimalne cesty
- clear all
- syms a b c d r
- % a)
- Rs = expand(1 - (1 - a * b) * (1 - a * d) * (1 - c * b) * (1 - c * d))
- RsMC_idem=subs(Rs,{a^2 b^2 c^2 d^2},{a b c d})
- RsMC_r=subs(RsMC_idem,{a b c d},{r r r r})
- % b)
- Rs=subs(RsMC_r,{r},{exp(-1*r)}) % funkcia bezporuchovosti
- f=-diff(Rs,r) % funkcia hustoty rozdelenia pravdepodobnosti
- FIP=simplify(f/Rs) % funkcia intenzity porúch
- t=0:5:50;
- ezplot(FIP,t)
- title('pravdepodobnosti pre Rs(t) ')
- T_D
- % priklad 1 exp
- % a)
- Tstr = 500
- lambda = 1 / Tstr
- Fx = expcdf(Tstr, 1 / lambda) % do 40 min
- %Rx = 1 - Fx % po 40 min
- % b)
- gama = 0.96
- Tgg= expinv(( 1 - gama ), 1 / lambda) % tento vzorec je v tahaku
- % c)
- q = 0.5
- tq = -log(1 - q) / lambda
- % d)
- t=0:100:1000
- f=exppdf(t,1/lambda)
- F=expcdf(t,1/lambda)
- R=1-F
- L=f./R % nezabudnut bodku
- plot(t,L)
- title('funkcia intenzity porúch')
- xlabel('t')
- ylabel('lambda(t)')
- legend('L','Location','Best')
- % priklad 2 weibul
- % a)
- data = [61 57 83 79 102 92]
- parametre=wblfit(data)
- alfa=parametre(2)
- beta=parametre(1)
- [Tstr rozptyl]=wblstat(beta,alfa)
- % b)
- t = 0:10:200
- F=wblcdf(t,beta,alfa)
- R = 1 - F
- plot(t,F)
- title('F(t)')
- xlabel('t')
- ylabel('F(t)')
- legend('F','Location','Best')
- % priklad 3 % podsys
- clear all
- format short
- L1=0.002;
- L2=0.02;
- syms r1 r2 r3 r4 t
- % bezporuchovosti komponentov
- r1 = exp(-L1 * t);
- r4 = exp(-L1 * t);
- r2r3 = exp(-L2 * t) * (1 + L2 * t); % nezáťažová rezerva
- % a) bezporuchovosť systému
- R14 = r1 * r4;
- Rs = 1 - (1 - R14) * (1 - r2r3)
- %Rs = simplify(Rs)
- % b) vykreslenie
- t_moje = 0:100:1000
- Rs_num = double(subs(Rs, t, t_moje)); % dosadenie t a prevod na čísla
- plot(t_moje,Rs_num)
- xlabel('t [hod]')
- ylabel('R_s(t)')
- title('Bezporuchovosť systému s prepínaním')
- grid on
- % 4. priklad minimalne cesty
- clear all
- syms r1 r2 r3 r4 r5 r
- % a)
- Rs = expand(1 - (1 - r1 * r2 * r3) * (1 - r4 * r5) * (1 - r4 * r2 * r3) * (1 - r5 * r3))
- RsMC_idem=subs(Rs,{r1^2 r2^2 r3^2 r4^2 r5^2},{r1 r2 r3 r4 r5})
- RsMC_r=subs(RsMC_idem,{r1 r2 r3 r4 r5},{r r r r r})
- % b) výpočet strednej doby do poruchy, uvažujeme exponenciálne rozdelenie
- syms lambda t
- Rs1=subs(RsMC_r,{r},{exp(-lambda*t)})
- Tstr=int(Rs1,t,0,Inf)
- assume(lambda>0)
- Tstr1=int(Rs1,t,0,Inf)
- % c) bonus
- Rs=subs(RsMC_r,{r},{exp(-0.05*r)}) % funkcia bezporuchovosti
- f=-diff(Rs,r) % funkcia hustoty rozdelenia pravdepodobnosti
- FIP=simplify(f/Rs) % funkcia intenzity porúch
- t=0:10;
- ezplot(FIP,t)
- title('pravdepodobnosti pre Rs(t) ')
- % druha verzia
- syms r r1 r2 r3 r4 r5 t;
- lam = 0.05;
- % a)
- Rs4 = 1-(1-r4*r5)*(1-r1*r2*r3)*(1-r4*r2*r3)
- Rss4 = expand(Rs4)
- Rs_idem4 = subs(Rss4, {r1^2 r2^2 r3^2 r4^2 r5^2}, {r1 r2 r3 r4 r5} )
- Rs_r4 = subs(Rs_idem4, {r1 r2 r3 r4 r5}, {r r r r r})
- Rs_lam4 = subs(Rs_r4, {r}, {exp(-lam*t)})
- % b)
- Tstr4 = int(Rs_lam4, t, 0, Inf)
- % Test C
- % Priklad 1
- clear all
- format short
- % Parametre
- lambda = 1 / 1000; % intenzita porúch [1/hod]
- T = 1 / lambda; % stredná doba do poruchy = 1000 hod
- % a) Pravdepodobnosť poruchy pred t1 = 600 hod
- t1 = 600;
- P_a = expcdf(t1, T); % F(t1)
- % b) Pravdepodobnosť, že sa NEporuší do t2 = 500 hod
- t2 = 500;
- P_b = 1 - expcdf(t2, T); % R(t2)
- % c) Pravdepodobnosť poruchy medzi t3 = 200 a t4 = 350 hod
- t3 = 200;
- t4 = 350;
- P_c = expcdf(t4, T) - expcdf(t3, T); % F(t4) - F(t3)
- % d) Graf F(t) a R(t)
- t = 0:200:2500;
- F = expcdf(t, T); % poruchovosť
- R = 1 - F; % bezporuchovosť
- figure
- plot(t,F,t,R)
- xlabel('Čas t [h]')
- ylabel('Pravdepodobnosť')
- title('Poruchovosť a bezporuchovosť')
- legend('Poruchovosť F(t)', 'Bezporuchovosť R(t)', 'Location', 'best')
- %Test C
- %Priklad 2
- clear all
- format short
- % Zadané hodnoty
- r = 0.75; % spoľahlivosť jedného prvku
- Rs_pozadovana = 0.995; % požadovaná spoľahlivosť systému
- % a) Hľadanie najmenšieho n pre paralelný systém
- n1 = 1;
- Rs1 = 1 - (1 - r)^n1
- n2 = 2;
- Rs2 = 1 - (1 - r)^n2
- n3 = 3;
- Rs3 = 1 - (1 - r)^n3
- n4 = 4;
- Rs4 = 1 - (1 - r)^n4
- % b) Spoľahlivosť pre n = 4
- Rs_b = Rs4;
- %Rs_3z4 = 4 * r^3 * (1 - r) + r^4;
- %Rs_4z5 = 5 * r^4 * (1 - r) + r^5;
- % c) spoľahlivosť pre systém 2 z 3
- Rs_c = 3 * r^2 * (1 - r) + r^3;
- fprintf('\nb) Spoľahlivosť systému so 4 paralelnými prvkami: Rs = %.4f\n', Rs_b);
- fprintf('c) Spoľahlivosť systému 2 z 3: Rs = %.4f\n', Rs_c);
- % Test C
- % Priklad 3
- clear all
- syms lambda1 lambda2 mu1 mu2 t
- A=[-lambda1-lambda2 0 mu2;lambda1 -lambda1 mu1; lambda2 lambda1 -mu1-mu2]
- A100=[-lambda1-lambda2 0 mu2;lambda1 -lambda1 mu1; 1 0 0]
- A011=[-lambda1-lambda2 0 mu2;lambda1 -lambda1 mu1; 0 1 1]
- A111=[-lambda1-lambda2 0 mu2;lambda1 -lambda1 mu1; 1 1 1]
- Aasymp=simplify(det(A100)/det(A111))
- Uasymp=simplify(det(A011)/det(A111))
- Aasymp_mu_lam=subs(Aasymp,{lambda1 lambda2 mu1 mu2},{0.05 0.005 1 2})
- Uasymp_mu_lam=subs(Uasymp,{lambda1 lambda2 mu1 mu2},{0.05 0.005 1 2})
- priklad prepinanie
- clear all
- format short
- L1=0.001;
- L=0.0015;
- syms r1 r2 r3 r4 r5 t
- Rs_a1=r1*r2*(exp(-L*t))*(1+L*t+((L*t)^2)/2)
- Rs_a2=subs(Rs_a1,{r1 r2},{exp(-L1*t) exp(-L1*t)})
- Rs_a=simplify(Rs_a2)
- Ts_a=int(Rs_a,t,0,Inf)
- Tstr_a=eval(Ts_a) % vyjadrenie hodnoty formou čísla
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement