標題:
excel亂數產生問題,救我啊~
請問如何產生24個亂數(亂數符合常態分配(平均641標準差150),且這24個數值總和等於15540?
最佳解答:
=INT(RAND()*500)+400 這是均勻分佈 ~~ 2008-05-29 09:24:48 補充： 給版主 : "平均641標準差150" >>> 這是初始條件 之後既是亂數產出, 就會有變化 例如跑出結果的 平均值 = 635, 標準差 = 141 ... 這樣能接受嗎 ?? "總和等於15540" 同上理, 這樣的要求, 理論上也不合理 ~~ 必須以程式反覆 try 出來接近的 ... 總之, 以上觀念轉不過來 ... 一組數據, 既是常態, 平均規定為641, 標準差規定為150, 總和規定為15540, 那就像是解方程式了 ~~ 2008-05-29 09:29:02 補充： 有興趣參考一下 : http://tw.myblog.yahoo.com/jw!_DIL5waFHwVKfL8odMZ4urti/article?mid=250&prev=278&next=249&l=f&fid=16 2008-05-31 23:16:36 補充： 以下自訂函數提供給您, 它可以產生常態分配的亂數 ~ (其中 XBar 表平均值, S 表標準差) 參考檔案 : http://www.FunP.net/644714 Function NormalData(XBar As Single, Optional S As Single) As Single If S = 0 Then S = 1 '標準差若不輸入,預設為 1 Const CntCLT As Byte = 100 Dim Cnt As Byte For Cnt = 1 To CntCLT '使用 100 個均勻亂數的平均, 產生需求之 "常態分配" 的亂數 NormalData = NormalData + Rnd '先加總 Next NormalData = NormalData / CntCLT '取平均 NormalData = (NormalData - 0.5) / (0.5 / 3 ^ 0.5) * S * CntCLT ^ 0.5 '將均勻分布之標準差轉為需求標準差 NormalData = XBar + NormalData '平移中心值 End Function
其他解答:
試過比較接近的 =INT(RAND()*500)+400 向下填滿 按 F9 觀察 2008-05-30 07:21:11 補充： 嗯， 常態分配，應該是中間高高的帽子型。0DD936AF46DC4FD4
excel亂數產生問題,救我啊~
- 從南勢角到汐止的客運
- 想換顯卡!! 但不知道跑不跑得動
- 三重國光客運@1@
- 三家輪胎價格及性能，哪一個比較好@1@
- 我想查詢衛署食字0930405722號有沒有通過衛生署核可
- 如何從樹林俊英街坐車到三重體育場--急急急
- 公司對勞健保費的滯納金要如何作帳---@1@
- 創見６３０充電後，無法開機-@1@
- 1500$左右狙擊鏡的選擇
- P90 疑問 請生存遊戲專家解難-
此文章來自奇摩知識+如有不便請留言告知
發問:請問如何產生24個亂數(亂數符合常態分配(平均641標準差150),且這24個數值總和等於15540?
最佳解答:
=INT(RAND()*500)+400 這是均勻分佈 ~~ 2008-05-29 09:24:48 補充： 給版主 : "平均641標準差150" >>> 這是初始條件 之後既是亂數產出, 就會有變化 例如跑出結果的 平均值 = 635, 標準差 = 141 ... 這樣能接受嗎 ?? "總和等於15540" 同上理, 這樣的要求, 理論上也不合理 ~~ 必須以程式反覆 try 出來接近的 ... 總之, 以上觀念轉不過來 ... 一組數據, 既是常態, 平均規定為641, 標準差規定為150, 總和規定為15540, 那就像是解方程式了 ~~ 2008-05-29 09:29:02 補充： 有興趣參考一下 : http://tw.myblog.yahoo.com/jw!_DIL5waFHwVKfL8odMZ4urti/article?mid=250&prev=278&next=249&l=f&fid=16 2008-05-31 23:16:36 補充： 以下自訂函數提供給您, 它可以產生常態分配的亂數 ~ (其中 XBar 表平均值, S 表標準差) 參考檔案 : http://www.FunP.net/644714 Function NormalData(XBar As Single, Optional S As Single) As Single If S = 0 Then S = 1 '標準差若不輸入,預設為 1 Const CntCLT As Byte = 100 Dim Cnt As Byte For Cnt = 1 To CntCLT '使用 100 個均勻亂數的平均, 產生需求之 "常態分配" 的亂數 NormalData = NormalData + Rnd '先加總 Next NormalData = NormalData / CntCLT '取平均 NormalData = (NormalData - 0.5) / (0.5 / 3 ^ 0.5) * S * CntCLT ^ 0.5 '將均勻分布之標準差轉為需求標準差 NormalData = XBar + NormalData '平移中心值 End Function
其他解答:
試過比較接近的 =INT(RAND()*500)+400 向下填滿 按 F9 觀察 2008-05-30 07:21:11 補充： 嗯， 常態分配，應該是中間高高的帽子型。0DD936AF46DC4FD4
文章標籤
全站熱搜
留言列表
