全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1054
推到 Plurk!
推到 Facebook!

Malab語言轉成C++語言或C#

尚未結案
s0958736
一般會員


發表:1
回覆:0
積分:0
註冊:2010-10-04

發送簡訊給我
#1 引用回覆 回覆 發表時間:2010-10-04 23:57:29 IP:140.113.xxx.xxx 訂閱

%讀取txt檔案算empty cell
a=load('t7.txt');
plot(a(:,1),a(:,2),'g');
xlabel('Wavelength(nm)');ylabel('T(%)');
axis([500 800 50 100]);
hold on
pause
smtlb = sgolayfilt(a,19,51);
y=smtlb(:,2);
smtlb(:,2)= SMOOTH(y,8);
plot(smtlb(:,1),smtlb(:,2),'r');
xlabel('Wavelength(nm)');ylabel('T(%)');
axis([500 800 50 100]);
pause
a=smtlb;
[m n]=size(a);
k=1;
z=0;
for m=100:3600
for n=2;
if ((a(m,n)>a(m-1,n)) & (a(m,n)>a(m 1,n)) & (a(m,n)>a(m-2,n)) & (a(m,n)>a(m 2,n)) & (a(m,n)>a(m-3,n)) & (a(m,n)>a(m 3,n)) & (a(m,n)>a(m-10,n)) & (a(m,n)>a(m 10,n)) & (a(m,n)>a(m-15,n)) & (a(m,n)>a(m 15,n)))
b(k, 1)=a(m,1);b(k, 2)=a(m,2);k = k 1;
end
end
end
c=b(find(b(:,1)<800 & b(:,1)>500),:)
[m n]=size(c)
e=m;
for m=1:e-1
for n=1
if(c(m 1,n)-c(m,n)>4)
z=z (1/c(m,n)-1/c(m 1,n))*1000;
else e=e-1;
end
end
end
e
d=0.5/(z/(e-1))
有誰可以幫幫我嗎><
我的Txt文字檔是兩排的數字
如下
198.43 637.00
198.70 636.00
198.97 645.00
199.24 646.00
199.50 638.00
199.77 638.00
200.04 631.00
........
主要就是輸入txt檔的檔名然後讀取txt黨內的資料
之後畫成圖檔的C程式,有哪一位大大可以點我一下呢><~~謝謝~

系統時間:2024-04-19 17:59:44
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!