【正文】 內(nèi)障術(shù)前準(zhǔn)備(天)術(shù)后觀察(天)1天2天2天3天4天概率40%60%30%50%20%表4：雙眼白內(nèi)障MonteCarlo模擬時(shí)所使用的概率白內(nèi)障(雙眼)術(shù)前準(zhǔn)備(天)術(shù)后觀察(天)12234概率40%60%20%65%15%表5：青光眼MonteCarlo模擬時(shí)所使用的概率青光眼術(shù)前準(zhǔn)備(天)術(shù)后觀察(天數(shù))23滿足正態(tài)分布(范圍：412；方程按正態(tài)分布擬合得到)概率59%41%表6：視網(wǎng)膜疾病MonteCarlo模擬時(shí)所使用的概率視網(wǎng)膜疾病術(shù)前準(zhǔn)備(天)術(shù)后觀察(天)23滿足正態(tài)分布(范圍：515；方程按正態(tài)分布擬合得到)概率62%38%表7：外傷MonteCarlo模擬時(shí)所使用的概率外傷術(shù)后觀察(天數(shù))概率滿足正態(tài)分布(范圍：515；方程按正態(tài)分布擬合得到)用計(jì)算機(jī)模擬的結(jié)果見(jiàn)附錄2。然后對(duì)白內(nèi)障雙眼患者進(jìn)行處理，將門診時(shí)間在k天以前且沒(méi)有入院的白內(nèi)障雙眼患者按門診時(shí)間進(jìn)行排序，開(kāi)始搜索，若同時(shí)滿足以下條件：1）2）t除7的余數(shù)為6，即當(dāng)天為周六則安排其入院，同時(shí)，如此繼續(xù)下去，直至白內(nèi)障雙眼患者處理完。最終根據(jù)統(tǒng)計(jì)頻數(shù)圖可以求得患者允許入院的等待天數(shù)。而現(xiàn)在我們規(guī)定在周末不做手術(shù)，所以，我們只需根據(jù)第二問(wèn)的程序，在里面更改一些約束條件即得解。當(dāng)日期與7的余數(shù)為5或者6時(shí)，手術(shù)時(shí)間x[i,3]=入院時(shí)間x[i,4]+7+1日期k除以7的余數(shù)；2) 對(duì)于青光眼和視網(wǎng)膜疾病的病人，加上約束條件：日期k除以7的余數(shù)不等于4或5。題中說(shuō)明的目標(biāo)函數(shù)是平均等待及治療時(shí)間盡量少，式子中R(i)為平均每天眼病代碼為i的病人就診人數(shù)，W_s(i)為眼病代碼為i的病人平均逗留時(shí)間，則目標(biāo)函數(shù)為：而，而R(i)、T(i)均為已知，用lingo編程即可求解(程序見(jiàn))。. 問(wèn)題二從Mathematica編程求得的解(詳見(jiàn)附錄4)中不難看出，以我們的方案安排患者入院與原方案相比，可以總共節(jié)省961天，平均每人可以節(jié)省2天多，對(duì)原方案的優(yōu)化程度較大。！這樣大大提高了病人的等待時(shí)間，也就是提高了醫(yī)院的效率。其實(shí)這是因?yàn)槲覀冊(cè)谔幚頂?shù)據(jù)的時(shí)候?qū)㈦p眼白內(nèi)障的病人住院時(shí)間往后推了很多，在調(diào)整的初期階段等待時(shí)間當(dāng)然是要變長(zhǎng)的，但是隨著時(shí)間往后推移，空出來(lái)的病床會(huì)增多，從而使得整體的住院時(shí)間變短。對(duì)問(wèn)題二理解并深入，從建立模型、改進(jìn)模型，到最后改進(jìn)方向，從常規(guī)方法到圖解方法，做得比較全面。模型采取滿分10分制，外傷病人就是10分，其他病人則需打分評(píng)定。單眼白內(nèi)障患者亦有相同情況出現(xiàn)。表9：白內(nèi)障等候病人入院優(yōu)先級(jí)的星期部分初評(píng)白內(nèi)障周一周二周三周四周五周六周日單眼7641256雙眼5213576l 等待時(shí)間長(zhǎng)度等待時(shí)間長(zhǎng)度這一因素對(duì)出外傷以外所有患者都有作用。對(duì)于非白內(nèi)障和外傷的病人，星期的影響基本沒(méi)有，為方便計(jì)算，星期影響權(quán)重為0，等待時(shí)間長(zhǎng)度影響為1。用Matlab編程，流程圖如下：（程序見(jiàn)附錄11）圖6 問(wèn)題二改進(jìn)方案程序流程圖問(wèn)題五：假定增加床的數(shù)量上限為10張，也就是說(shuō)增加3張到10張，用病床總數(shù)量82張到89張各情況都計(jì)算一次。原方案對(duì)于某天的某個(gè)患者不需要計(jì)算就可以預(yù)測(cè)，在計(jì)算方面會(huì)優(yōu)于方案二，但是方案一只能預(yù)測(cè)一部分人，總有患者的入院時(shí)間安排是例外的，方案二的預(yù)測(cè)具有更廣泛的適用性。現(xiàn)在，提高工作效率已經(jīng)成為了一個(gè)熱點(diǎn)問(wèn)題，在有限的資源情況下，我們希望做出更多的事情。并將該模型簡(jiǎn)單地應(yīng)用在電子商務(wù)、售票系統(tǒng)、虛擬書店等方面，通過(guò)這些實(shí)例的研究，充分說(shuō)明了該模型的有效性和合理性。R=7。load=R*T。W_q=Pwait*T/(Sload)。W_s=W_q+T。END3. Mathematica對(duì)實(shí)現(xiàn)第二問(wèn)的程序k=1。amp。Bed[[k]]=Bed[[k]]1。 xt=X[[i,6]]。 (*外傷病人處理完畢*) (*對(duì)雙白內(nèi)障病人處理*) If[R[[i,1]]?2amp。Bed[[k]]0, Print[k=,k,有空床3]。X[[i,5]]=X[[i,4]]+2。 Bed[[xt]]=Bed[[xt]]+1。(Mod[k,7]?1||Mod[k,7]?6)amp。Bed[[k]]=Bed[[k]]1。 xt=X[[i,6]]。 (*對(duì)單白內(nèi)障病人處理完畢*) (*對(duì)青光眼及視網(wǎng)膜病人處理*) If[(R[[i,1]]?3||R[[i,1]]?4)amp。amp。Bed[[k]]0, Print[k=,k,有空床2]。(*這是這里按術(shù)前兩天計(jì)算*) X[[i,5]]=0。 Bed[[xt]]=Bed[[xt]]+1。(*對(duì)病人循環(huán)處理至此結(jié)束*) Bed[[k+1]]=Bed[[k+1]]+Bed[[k]]。4. 對(duì)第二問(wèn)中未知數(shù)據(jù)和不合理數(shù)據(jù)的模擬結(jié)果病人序號(hào)類型代碼準(zhǔn)備間期觀察病人序號(hào)類型代碼準(zhǔn)備間期觀察病人序號(hào)類型代碼準(zhǔn)備間期觀察151041784201335543092420121794209356222331203180420113574201144208181120435842012532091824201235922236430131832223360222372223184320736142078430818522233621103922221863208363420101012021874209364420121143010188212336542010122223189120336642071322231902223367420914320619142093682223154201119242012369420816420819342013370212317420141944309371222318110219522243724209193207196430837332072021231972223374320821420111985107375212322320819922233764306231102200120337722222411022014301037822232522232024305379330826430102031203380430102733072041202381222428120420533063824301129510420643013383430830222320712033842223314301020821233853301032212320911023864308334301121042010387430734430102111102388330935110421221243892223364208213222339021243742010214510739142011382222215420113921103392122216110339321224051092172123394420104132072182223395430124222232194201139643084321222204201139712024422242214201439843012452122222110239922234642072231103400420947222422442074011102485106225420940222244922232262223403420550120222721244044201251320722812024054201352420102292223406212253510523051074072223541203231120340832075522222322123409320956212323351034104207574201123432012411320858420122354209412222459110423651044134201160212323742014414120361420523842013415212462420823921234161204633208240420641721226412032414205418420106551042423308419110266120424343011420420867330112441203421510468430824543094225106691204246222242351077022