2010年9月26日 星期日

[自動轉寄] Re: [問題] mathematica陣列處理相關問題

作者: hcl012 (怪龍-卡西歐魯)
標題: Re: [問題] mathematica陣列處理相關問題
時間: Mon Sep 27 00:33:38 2010

※ 引述《chungyuandye (養花種魚數月亮賞星星)》之銘言:
: ※ 引述《hcl012 (怪龍-卡西歐魯)》之銘言:
: : 標題: [問題] mathematica陣列處理相關問題
: : 時間: Sat Sep 25 14:13:58 2010
: : 下面是我的code
: : --
: : b = {{0, 0, 0}, {1, 0, 0}, {1, 0, 1}, {1, 1, 1}, {1, 1, 0}, {0, 1, 0}};
: : cent[b_] := {
: : (b[1, 1] + b[2, 1] + b[3, 1] + b[4, 1] + b[5, 1] + b[6, 1])/ 6,
: : (b[1, 2] + b[2, 2] + b[3, 2] + b[4, 2] + b[5, 2] + b[6, 2])/ 6,
: : (b[1, 3] + b[2, 3] + b[3, 3] + b[4, 3] + b[5, 3] + b[6, 3])/6};
: : cent[b]
: : --
: : 上面的陣列b裝著六個點的座標
: : 而cent[b]是算出六個點的中點
: : 理論上應該是要output出{0.66666, 0.5, 0.33333}之類的東西...
: : 但是結果卻像下面這張圖這樣
: b[x,y]在Mathematica中指的是b的函數,要取出陣列的的元素要用Part或是[[]]
: b[[All,i]]=>各列的第i個元素
: 所以cent這個函數可以寫成
: b={{0,0,0},{1,0,0},{1,0,1},{1,1,1},{1,1,0},{0,1,0}};
: cent1[b_List]:=Total[b[[All,#]]]/Length[b]&/@Range[Last[Dimensions[b]]]
: 但是如果只是要取重心或是平均數,那直接用Mean就可以了!
: cent2[b_List]:=Mean[b]
: cent1[b]
: cent2[b]

太感謝了

其實我就是需要Mean[]這樣的功能

只是對mathematica函數不熟所以都只好自己寫....


--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 72.223.2.129

2010年9月23日 星期四

[自動轉寄] apple mac mini

作者: farmfox (買大魯閣代幣Q我)
標題: apple mac mini
時間: Fri Sep 24 09:32:07 2010

哈囉...我看macshop版上你有要徵一台mac mini server...我有一台要賣24000...

高雄面交...你有需要嗎?

--

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.116.178.225

[自動轉寄] 請問你有徵到mac mini了嗎?

作者: AvatarGuo (終於完成夢想)
標題: 請問你有徵到mac mini了嗎?
時間: Thu Sep 23 22:22:05 2010


請問你有徵到了嗎?

我這裡有一台要賣

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.116.72.102

2010年9月21日 星期二

[自動轉寄] MAC MINI Server

作者: chiaminchang (MIN˙-˙*)
標題: MAC MINI Server
時間: Tue Sep 21 21:27:33 2010


你好

我有一台MAC MINI Server

全新未拆

實在沒有時間可以研究...

24000可以接受嘛??

請問是哪個地區的??

謝謝

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.62.244.178

2010年9月9日 星期四

[自動轉寄] Re: [徵求] Mac Mini Server 8G

作者: alspike (worm)
標題: Re: [徵求] Mac Mini Server 8G
時間: Fri Sep 10 13:24:47 2010

※ 引述《chungyuandye (養花種魚數月亮賞星星)》之銘言:
: [我想要買]:Mac mini server 8g
: [保固狀態]:要
: [原始發票]:可有可無
: [希望價格]:24000,可以更低嗎????
: [連絡方式]:站內信
: [交易方式]:高雄面交
: [備註事項]:無

全新未拆封25000台北面交可以嗎? 也可以26000含運費唷!

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.112.211.225