tkyswiki @ ウィキ

zemi/ゼミA最終課題

2014-05-20T20:20:44+09:00

あほだ

CG

2013-11-28T15:27:33+09:00

URL: -[[iwahori>http://www.cvl.cs.chubu.ac.jp/~iwahori/Ogl/]]

トップページ

2013-11-28T15:26:56+09:00

*[[zemiB]] *[[CG]] ---- http://157.110.43.132/okuiwiki/index.php?%BE%F0%CA%F3%B9%A9%B3%D8%BC%C2%B8%B3%28%A5%B3%A5%F3%A5%D1%A5%A4%A5%E9%29 ---- |&color(red){課題1}|上記のパーサーの正規表現を少し変えると，&br()非負の少数を切り出すパーサーをつくることができる．&br()つくったパーサーが正しく動作する&br()（つまり，非負少数は正しく切り出せるが，&br()非負少数でないものを与えると失敗してundefinedを返す）&br()ことを適切なテスト例を用いて示せ．||| ||作成上の注意|作成したパーサーの定義と説明およびテスト結果|| ||||| |&color(red){課題2}|上記のパーサーpに正しくない入力を与えると&br()ちゃんと解析に失敗してundefinedを返すことを，&br()適切なテスト例を用いて示せ．||| ||作成上の注意|テスト結果|| ||||| |&color(red){課題3}|termとexprのアクションとして、&br()evalExprの代わりに適当な関数を設定して数式を読み込むと、&br()括弧を補った数式が出力されるようにせよ。||| | ||before|after| | ||1+2*3&br()1-2-3-4&br()1-(2-3)-4|(1+(2*3))&br()(((1-2)-3)-4)&br()(((1-(2-3))-4)| ||作成上の注意|作成したアクション関数の定義と説明およびテスト結果|| ||||| |&color(red){課題4}|式の文法を拡張して以下の演算子をサポートせよ|変更後のパーサーとアクション関数の定義&br()（変更部分を明示せよ）と説明およびそのテスト結果|| |||拡張する演算子|%,<=,>=,!=| ||作成上の注意||| ||||| |&color(red){課題5}|C言語風のdo-while文をサポートするように&br()プログラムを拡張せよ&br()（do-while文のパーサーとアクション関数をつくり追加せよ）。||| ||作成上の注意|do-while文の処理を追加した後のパーサー&br()（変更部分を明示せよ）&br()とアクション関数の定義、説明およびそのテスト結果|| -------- ------- **@wikiへようこそ -ウィキはみんなで気軽にホームページ編集できるツールです。 -このページは自由に編集することができます。 -メールで送られてきたパスワードを用いてログインすることで、各種変更（サイト名、トップページ、メンバー管理、サイドページ、デザイン、ページ管理、等）することができます **まずはこちらをご覧ください。 -[[@wikiの基本操作>http://atwiki.jp/guide/category2.html]] -[[用途別のオススメ機能紹介>http://atwiki.jp/guide/category22.html]] -[[@wikiの設定/管理>http://atwiki.jp/guide/category6.html]] **分からないことは？ -[[@wiki ご利用ガイド>http://atwiki.jp/guide/]] -[[よくある質問>http://atwiki.jp/guide/category1.html]] -[[無料で会員登録できるSNS内の@wiki助け合いコミュニティ>http://sns.atfb.jp/view_community2.php?no=112]] -[[@wiki更新情報>http://www1.atwiki.jp/guide/pages/264.html]] -[[@wikiへのお問合せフォーム>http://atwiki.jp/helpdesk]] 等をご活用ください **@wiki助け合いコミュニティの掲示板スレッド一覧 #atfb_bbs_list(112) **その他お勧めサービスについて -[[大容量１Ｇ、PHP/CGI、MySQL、FTPが使える無料ホームページは@PAGES>>http://atpages.jp/]] -[[無料ブログ作成は@WORDをご利用ください>>http://atword.jp/]] -[[2ch型の無料掲示板は@chsをご利用ください>>http://atchs.jp/]] -[[フォーラム型の無料掲示板は@bbをご利用ください>>http://atbb.jp/]] -[[お絵かき掲示板は@paintをご利用ください>>http://atpaint.jp/]] -[[その他の無料掲示板は@bbsをご利用ください>>http://atbbs.jp/]] -[[無料ソーシャルプロフィールサービス @flabo(アットフラボ)>>http://sns.atfb.jp]] **おすすめ機能 -[[気になるニュースをチェック>http://atwiki.jp/guide/17_174_ja.html]] -[[関連するブログ一覧を表示>http://atwiki.jp/guide/17_161_ja.html]] **その他にもいろいろな機能満載！！ -[[@wikiプラグイン>http://atwiki.jp/guide/category17.html]] -[[@wiki便利ツール>http://atwiki.jp/guide/category32.html]] -[[@wiki構文>http://atwiki.jp/guide/category16.html]] -[[@wikiプラグイン一覧>http://www1.atwiki.jp/guide/pages/264.html]] -[[まとめサイト作成支援ツール>http://atwiki.jp/matome/]] **バグ・不具合を見つけたら？要望がある場合は？お手数ですが、[[お問合せフォーム>http://atwiki.jp/helpdesk]]からご連絡ください。

6/13

2013-10-24T19:45:59+09:00

load eog_left2.mat load eog_right2.mat load move_data.mat [[加算平均したときの誤差]] plot(-1:.001:1,move_data(eog_right2(1)-1000:eog_right2(1)+1000,21)) 1回目の波を表示 (ｙ：マイクロV　　ｘ：時間) ---- #region(加算平均) #region(加算平均10個) 1~10個目の加算平均 signal = zeros(2001,1); for i = 1:10 signal = signal + move_data(eog_right2(i)-1000:eog_right2(i)+1000,21); end figure plot(-1:.001:1,signal/10) ylim([-50 50]); signal1=signal; //xlim([1 2001]); //11~20個目の加算平均 signal = zeros(2001,1); for i = 11:20 signal = signal + move_data(eog_right2(i)-1000:eog_right2(i)+1000,21); end plot(-1:.001:1,signal/10) ylim([-50 50]); signal2=signal; //21~30個目の加算平均 signal = zeros(2001,1); for i = 21:30 signal = signal + move_data(eog_right2(i)-1000:eog_right2(i)+1000,21); end plot(-1:.001:1,signal/10) ylim([-50 50]); signal3=signal; //31~40個目の加算平均 signal = zeros(2001,1); for i = 31:40 signal = signal + move_data(eog_right2(i)-1000:eog_right2(i)+1000,21); end plot(-1:.001:1,signal/10) ylim([-50 50]); signal4=signal; //41~50個目の加算平均 signal = zeros(2001,1); for i = 41:50 signal = signal + move_data(eog_right2(i)-1000:eog_right2(i)+1000,21); end plot(-1:.001:1,signal/10) ylim([-50 50]); signal5=signal; plot plot(-1:.001:1,signal1/10,'b') hold on plot(-1:.001:1,signal2/10,'r') plot(-1:.001:1,signal3/10,'g') plot(-1:.001:1,signal4/10,'m') plot(-1:.001:1,signal5/10,'c') #endregion() ---- #region(20個) 1~20個目の加算平均 signal = zeros(2001,1); for i = 1:20 signal = signal + move_data(eog_right2(i)-1000:eog_right2(i)+1000,21); end plot(-1:.001:1,signal/20) ylim([-50 50]); signal21=signal; 11~30個目の加算平均 signal = zeros(2001,1); for i = 11:30 signal = signal + move_data(eog_right2(i)-1000:eog_right2(i)+1000,21); end plot(-1:.001:1,signal/20) ylim([-50 50]); signal22=signal; 21~40個目の加算平均 signal = zeros(2001,1); for i = 21:40 signal = signal + move_data(eog_right2(i)-1000:eog_right2(i)+1000,21); end plot(-1:.001:1,signal/20) ylim([-50 50]); signal23=signal; 31~50個目の加算平均 signal = zeros(2001,1); for i = 31:50 signal = signal + move_data(eog_right2(i)-1000:eog_right2(i)+1000,21); end plot(-1:.001:1,signal/20) ylim([-50 50]); signal24=signal; #endregion() ---- #region(30個) 1~30個目の加算平均 signal = zeros(2001,1); for i = 1:30 signal = signal + move_data(eog_right2(i)-1000:eog_right2(i)+1000,21); end plot(-1:.001:1,signal/30) ylim([-50 50]); signal31=signal; 21~50個目の加算平均 signal = zeros(2001,1); for i = 11:40 signal = signal + move_data(eog_right2(i)-1000:eog_right2(i)+1000,21); end plot(-1:.001:1,signal/30) ylim([-50 50]); signal32=signal; 21~50個目の加算平均 signal = zeros(2001,1); for i = 21:50 signal = signal + move_data(eog_right2(i)-1000:eog_right2(i)+1000,21); end plot(-1:.001:1,signal/30) ylim([-50 50]); signal33=signal; #endregion() #endregion() ---- #region(フーリエ変換) fft_signal = fft(signal); log_signal = log10(abs(fft_signal)); ifft_signal = ifft(log_signal); figure plot(real(ifft_signal)) ylim([-0.5 3]); figure plot(f/t:f/t:f/2,abs(fft_signal(2:1001))); ylim([-1500 100000]); #endregion() ---- #memo(octave:42> zero_y1 = fft_y1;\noctave:43> length（fft_y1 ）\nans = 378874\noctave:44> length（fft_y1）;\noctave:45> length（fft_y1）;\noctave:46> length（fft_y1）\nans = 378874\noctave:47> length（fft_y1）/388747\nans = 0.97460\noctave:48> length（fft_y1）/378874\nans = 1\noctave:49> length（fft_y1）*10/378874\nans = 10\noctave:50> length（fft_y1）*10/51200\nans = 73.999\noctave:51> zero_y1（1:74）=zeros;\noctave:52> zero_y1（length（zero_y1）-74:length（zero_y1））=zeros;\noctave:53> plot（real（zero_y1））;\noctave:54> plot（real（zero_y1））;\noctave:55> ifft_y1 = ifft（zero_y1）;\noctave:56> plot（real（ifft_y1））;\noctave:57> zero_y1 = fft_y1;\noctave:58> zero_y1（1:74*5）=zeros;\noctave:59> zero_y1（length（zero_y1）-（74*5）:length（zero_y1））=zeros;\noctave:60> ifft_y1 = ifft（zero_y1）;\noctave:61> plot（real（ifft_y1））;) #memo() #memo() signal = zeros(2001,1); for i = 1:50 signal = signal + move_data(eog_right2(i)-1000:eog_right2(i)+1000,21); end plot(-1:.001:1,signal/50) hold off plot(-1:.001:1,signal/50) signal_S = signal; signal_N101 = signal-signal1; signal_SN = signal_S/signal_N101; signal_S = signal/50; signal_N101 = signal_S - signal1/10; signal_SN = signal_S/signal_N101; plot(signal_SN ) signal2 = zeros(2001,1); for i = 1:10 signal2 = signal2 + move_data(eog_right2(i)-1000:eog_right2(i)+1000,8); end plot(-1:.001:1,signal2/10) ylim([-30 30]) plot(-1:.001:1,signal3/10) signal4 = zeros(2001,1); for i = 1:10 signal4 = signal4 + move_data(eog_left2(i)-1000:eog_left2(i)+1000,8); end figure plot(-1:.001:1,signal4/10) ylim([-40 40])

加算平均したときの誤差

2013-07-18T11:52:00+09:00

octave:122> max(abs(signal_n1)) ans = 7.1833 octave:123> max(abs(signal_n2)) ans = 5.3990 octave:124> max(abs(signal_n3)) ans = 6.0399 octave:125> max(abs(signal_n4)) ans = 8.3160 octave:126> max(abs(signal_n5)) ans = 6.9596 octave:127> max(abs(signal_n21)) ans = 5.1727 octave:128> max(abs(signal_n22)) ans = 3.6067 octave:129> max(abs(signal_n23)) ans = 3.6014 octave:130> max(abs(signal_n24)) ans = 5.7461

font_size

2013-07-11T17:53:39+09:00

set(gca,'FontName','Helvetica','Fontsize',12)

メニュー

2013-07-11T17:53:27+09:00

**メニュー -[[トップページ]] //-[[プラグイン紹介>プラグイン]] //-[[まとめサイト作成支援ツール]] -[[メニュー]] //-[[メニュー2]] //-[[tkys]] //-[[sazanami]] //-[[oct]] -[[report]] -[[zemi]] -[[tkysmzn]] -[[font_size]] **[[更新履歴]] #recent(15) ---- **リンク -[[@wiki>>http://atwiki.jp]] -[[@wikiご利用ガイド>>http://atwiki.jp/guide/]] **他のサービス -[[無料ホームページ作成>>http://atpages.jp]] -[[無料ブログ作成>>http://atword.jp]] -[[2ch型掲示板レンタル>>http://atchs.jp]] -[[無料掲示板レンタル>>http://atbbs.jp]] -[[お絵かきレンタル>>http://atpaint.jp/]] -[[無料ソーシャルプロフ>>http://sns.atfb.jp/]] // リンクを張るには "[" 2つで文字列を括ります。 // ">" の左側に文字、右側にURLを記述するとリンクになります //**更新履歴 //#recent(20) &link_editmenu(text=ここを編集)

tkysmzn

2013-07-04T19:31:56+09:00

[[sig1]] [[sig2]] [[sig3]] -[[最終課題]] -[[最終課題>tkysmzn/kadai]]

zemi/ゼミA最終課題/③

2013-06-27T19:20:58+09:00

-加算平均が少ない->多い --波形がどうなるか --SN比が何回やると上がるか(SN比の検討) --スペクトルがどうなるか

zemi

2013-06-27T19:20:09+09:00

-[[5/30]] -[[6/6]]] -[[6/13]] -[[ゼミA最終課題>zemi/ゼミA最終課題]]