WOLFRAM

Wolfram言語 ＆ システムドキュメントセンター

衛星電源の部分系

人工衛星は電池からの電力が必要で，これは太陽電池パネルによって再充電される．電池には予備電池が含まれる．

Wolfram Language code: 𝒟Battery = ExponentialDistribution[1 / 300]; 𝒟Solarpanels = ExponentialDistribution[1 / 1000]; 𝒮battery = StandbyDistribution[𝒟Battery, {𝒟Battery}]; ℛsatellite = ReliabilityDistribution[solarpanel∧battery, {{solarpanel, 𝒟Solarpanels}, {battery, 𝒮battery}}];
系が持ちこたえられる負荷サイクル数の平均：
Wolfram Language code: μ = NExpectation[t, tℛsatellite]
Wolfram Language code: Plot[SurvivalFunction[ℛsatellite, t], {t, 0, 800}, Filling -> Axis, PlotStyle -> Thick]
コンポーネントの改善可能性：
Wolfram Language code: Plot[Evaluate@ImprovementImportance[ℛsatellite, t], {t, 0, 800}, PlotLegends -> {"太陽電池パネル", "電池"}, Filling -> Axis]