線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1329
推到 Plurk!
推到 Facebook!

數學式子該如何以程式來表現

缺席
adonis
高階會員


發表:140
回覆:258
積分:159
註冊:2002-04-15

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-04-13 17:11:46 IP:211.76.xxx.xxx 未訂閱
請問數學式子 e^jx = Cosx jSinx 該如何以程式來表現,謝謝。 由其是那 j ...?
------
我也在努力學習中,若有錯謬請見諒。
flyup
資深會員


發表:280
回覆:508
積分:385
註冊:2002-04-15

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-04-13 19:52:49 IP:61.225.xxx.xxx 未訂閱
這是尤拉靜電電荷向量式..基本公式  ?    j 表示什麼?    尤拉(Euler)公式: (e^jx=cosx+jsinx)    善用「注意力」,就是善於掌握「優先次序」—分清那些是重要的及不重要的。 「捨」才會「得」,集中焦距,才能發揮核心優勢。 發表人 - flyup 於 2003/04/13 19:56:49
timhuang
尊榮會員


發表:78
回覆:1815
積分:1608
註冊:2002-07-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-04-13 23:16:49 IP:61.221.xxx.xxx 未訂閱
引言: j 表示什麼?
j 代表著就是複數的 (-1)^(1/2) 根號-1 啦~ 因為是一個虛常數, 所以用 i 或用 j 來表示...
引言: 請問數學式子 e^jx = Cosx jSinx 該如何以程式來表現,謝謝。 由其是那 j ...?
delphi 中的 VarCmplx unit 有部分的功能, 可以試試看! e^jx 用程式來寫就是 VarComplexExp(VarComplexCreate(0,x)); Cosx jSinx 則是 VarComplexCreate(Cos(x),Sin(x)); 單 j 的話, 則是 VarComplexCreate(0,1) 囉.... 不過 delphi 的 complex 都是 variant ... 但仍可做運算, 引述 on-line help 中的資料: Complex Variants are custom Variants that represent complex numbers. The Variant type supports direct manipulation using the addition, subtraction, multiplication, division (but not integer division), and negation operators. They have 5 published properties: Real, Imaginary, Radius, Theta, and FixedTheta. They can be cast to and from integer types, floating point types, string types, TDateTime values, and boolean values. In addition, the VarCmplx unit implements a number of global functions for operating on complex Variants. 所以可以利用 c.Real, c.Imaginary 來存取複數的實部和虛部. 也可以進行加減乘除的運算(除了整數除法外). 發表人 - timhuang 於 2003/04/14 00:46:50
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-04-14 16:40:52 IP:203.73.xxx.xxx 未訂閱
引言: 請問數學式子 e^jx = Cosx + jSinx 該如何以程式來表現,謝謝。 由其是那 j ...?
adonis 你好: 尤拉公式,是可以經由 FFT 轉換的,建議你查詢有關這方面的資料 < src="http://delphi.ktop.com.tw/loadfile.php?TOPICID=8977166&CC=200774"> -- Enjoy Researching & Developing --
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
adonis
高階會員


發表:140
回覆:258
積分:159
註冊:2002-04-15

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-04-15 16:24:50 IP:163.15.xxx.xxx 未訂閱
timhuang 可否舉個實例?謝謝。
------
我也在努力學習中,若有錯謬請見諒。
timhuang
尊榮會員


發表:78
回覆:1815
積分:1608
註冊:2002-07-15

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-04-15 19:24:52 IP:211.72.xxx.xxx 未訂閱
引言: timhuang 可否舉個實例?謝謝。
OK... 放個 memo 到 form 上, uses 加入 VarCmplx 後, 寫入
procedure TForm1.Button1Click(Sender: TObject);
var
  c1, c2, c3: Variant;
begin
  c1 := VarComplexCreate(1,2);
  Memo1.Lines.Add('c1='+c1);
  c2 := VarComplexCreate(0,5);
  c2 := VarComplexExp(c2);      // c2 = e^5j
  Memo1.Lines.Add('c2='+c2);
  c3 := VarComplexCreate(cos(5), sin(5));  // c3 = cos(5)+jsin(5)
  Memo1.Lines.Add('c3='+c3);
end;
adonis
高階會員


發表:140
回覆:258
積分:159
註冊:2002-04-15

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-04-16 09:27:41 IP:163.15.xxx.xxx 未訂閱
timhuang 謝謝您,真是太清楚明白了。 可否再進一步的請教: 之所以會想得知尤拉公式的寫法,主要是用在 Image Transforms。 所以想再請教您的是--經過FFT的轉換後所得的數值是如此長的一串且內含虛數在裡頭,如此儲存成檔案時該用什麼格式?是否又會產生什麼新的問題。 通常在影像處理上,針對該 Pixel 處理完要另建檔案時我都是用 Byte 為單位,所以我真不知經由 FFT 後所產生的數值該以什麼格式來儲存。謝謝。
------
我也在努力學習中,若有錯謬請見諒。
系統時間:2024-05-04 18:28:49
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!