toridai_suikou @ Wiki

CREST

2010-05-02T20:59:15+09:00

[2010/04/30]　 + Inflow checking -> HY +bypass boundary setting -> JK +evaluate the evaporation volume -> JK +add evaporation volume into the inflow discharge -> JK [2010/05/07 13:00] First research discussion -> JK, HY &bold(){流入量の処理} 平水時：1日ごとの平均（特にバイバス作動時は，濁度10度以下の清水）洪水時はmatlabのsplinefitを利用した値 newData1=importdata('urayama2009.dat') data=newData1.data; x=data(:,1) y=data(:,3) pp=spline(x,y) qq=splinefit(x,y,6) yy = ppval(pp,x); zz = ppval(qq,x); plot(x,y,'bo',x,yy,'r',x,zz,'k')

EXCEL

2013-02-20T11:14:27+09:00

&bold(){空白セルの補完} A2からA4が空白として，A1からA5を選択して「編集」―「フィル」―「連続データの作成」を開き「データ予測」にチェックを入れて「OK」． &bold(){複数のシートをまとめる（指定範囲）} Sub matome() Dim LastR As Long, TgtR As Long Dim Sh As Worksheet, TgtSh As Worksheet ' まとめるシート名はSheet1 Set TgtSh = Sheets("Sheet1") Application.ScreenUpdating = False ' TgtR = 1 ' もとのシートのサイトの行をＤ列で探す TgtR = TgtSh.Range("D65536").End(xlUp).Row + 1 ' TgtSh.Rows("1:" & TgtSh.Range("A65536").End(xlUp).Row).Delete For Each Sh In ThisWorkbook.Worksheets If Sh.Name <> TgtSh.Name Then With Sh LastR = .Range("A65536").End(xlUp).Row If LastR > 1 Then ' .Rows("1:" & LastR).Copy TgtSh.Rows(TgtR) .Rows("10:33").Copy TgtSh.Rows(TgtR) End If End With TgtR = TgtSh.Range("A65536").End(xlUp).Row + 1 End If Next Application.ScreenUpdating = True End Sub &bold(){条件付き最大値を求める} >=MAX(INDEX ( ( C2:C65<200)*C2:C65,))

ELCOM-SWAN

2010-01-04T22:24:48+09:00

**ELCOMとSWANのカップリングに関する情報 The next release of ELCOM will includes 1-way coupling to the wave model [[SWAN]]. For coupling to SWAN, the transferred fields are: Fields acquired from the WAVE Model +Wdir: Wave direction (degrees) +Wamp: Significant wave height (m) +Wlen: Average wave length (m) +TM01: mean absolute wave period (s) +Wptop: Surface wave relative peak period (s) +Wpbot: Bottom wave period (s) +Wbrk: Percent of breakig waves (nondimensional) +Wdiss: Wave energy dissipation (W/m2) +Wubot: Wave bottom orbital velocity (m/s) In the future Fields sent to the WAVE Model: +Bathymetry, bottom elevation (m) +Free-surface, water surface elevation (m) +Depth integrated u-momentum (m/s) +Depth integrated v-momentum (m/s)

中海

2010-01-05T09:48:09+09:00

&bold(){今後の研究方針} &bold(){-１月8日まで} 境界条件の検討（WEP・境水道パターン，WEP・境水道・湖心パターン）　これまでのパターンと比較（どれがもっともよさそうか討議） -流速分布の比較 -躍層の振動の比較 &bold(){-1月13日まで} 解析項目と作成図（含むアニメーション）の検討と討議 &bold(){-1月20日まで} 図作成と解析結果の討議 &bold(){-2月3日まで} 卒論の記述

CWRModel

2013-02-20T10:08:00+09:00

&bold(){Excelでcwr datesに変更する方法} セルA1（1993.12.31 11:00:00）を対象に変更（1993365.4583） =ROUND(YEAR(A1)*1000+(A1-DATE(YEAR(A1),1,1)+1 ),4) &bold(){ELCOMで年をまたいだ計算を行うときの注意点} 境界条件ファイル（気象，波浪等）において，年初めのデータを2重化して，2009001.000 のデータの前に，2008367.000 のデータを作成しておくこと．

MATLAB

2010-10-26T10:38:46+09:00

&bold(){緯度経度座標からUTM及び第Ⅲ座標系への変換} data=load('Shinjiko_lon_lat.dat') lat=data(:,1)/180*pi lon=data(:,2)/180*pi lon=data(:,2)/180*pi [N,E,Zone]=ell2utm(lat,lon,a,e2) lon1=(132+10/60)/180*pi lat1=(36)/180*pi [N1,E1,Zone]=ell2utm(lat1,lon1,a,e2) N=N-N1; E=E-E1; &bold(){x,yデータからspline補間をもとめ、yに対応したxを求める方法の例} x = sort(rand(10,1)); y = exp(x); pp = spline(x,y); y0 = 1.5; x0=fzero(@(x) ppval(x,pp)-y0,.1) x0 = 0.4055 &bold(){雲量データのようにとびとびデータを補完する方法の例} 雲量の観測値があるデータのみ取り出したデータを作成（時間順？）例，ファイル名= unryo.dat data=load('unryo.dat') 補完したい範囲の時間軸の大きさを確認（例，10000) xx=[1:10000]; yy=interp1(data(:,1),data(:,2),xx); yy=yy' &bold(){同水位データがあり，水位変化後のデータだけを利用して補完する方法の例} data=load('sample.dat'); [m,n]=size(data) data2=data; for i=2:m if(data(i,2)==data(i-1,2)) data2(i,2)=NaN; end; end i=find(~isnan(data2(:,2))) data3=data2(i,:); xx=[1:m]; yy=zeros(m,2); yy(:,1)=xx; yy(:,2)=interp1(data3(:,1),data3(:,2),xx);

忘備禄

2009-09-13T12:00:44+09:00

&bold(){水工学研究室号について} エンジンオイルの混合比は１：５０です。 Hydro号　498? 船外機の燃料タンクについて　燃料残量計にあるつまみを回して、たまに大気解放してやること。でないと、燃料があるにもかかわらず、ガス欠になります。 &bold(){ロープワークについて} 以下を参考に、最低のロープワークをマスターしてください。 [[日本海洋レジャー安全・振興協会>http://www.jmra.or.jp/dl/ropework.pdf]]

ゼミ予定

2010-05-28T14:49:11+09:00

&bold(){これからのゼミ} 　2010年度のゼミ予定　基本的に湖沼班は、月曜日の3、4限（13:00～）に行う。　　　　　気象班は、金曜日の4限（14：40～） &bold(){過去のゼミ} ◆2009年度平成21年9月1日　文献ゼミ　担当：Hitoshi J. 平成21年9月15日　文献ゼミ　担当：Kensuke M. 平成21年10月13日　文献ゼミ　担当：Atsushi K. 平成21年10月19日　日韓セミナーの発表練習平成21年12月7日　文献ゼミ　担当：Kazuhiro T.

Kazuhiro.T

2009-09-29T16:40:08+09:00

&bold(){現在行っている内容} 学習中の論文：研究中の内容： &bold(){これまでに行った内容} 論文リスト：研究内容：　＊気象計　　　　　　　　・回収したデータは　　マイコンピュータ　　　　　　　　　　　　　　　　　　　ローカルディスク:C 　　　　　　　　　　　　　　　　　　　 Campbellsci 　　　　　　　　　　　　　　　　　　　 LoggerNet　　　　　に入っている。　　　　　　　　　・時間が1ヶ月に10秒くらいずれるため気象計を使うときは時間を合わせる。　　　　　　　　・バッテリーの　＋、－　の接続はどちらでもいい。

Yuki.Ki

2009-09-03T12:58:13+09:00

&bold(){現在行っている内容} 学習中の論文：研究中の内容： &bold(){これまでに行った内容} 論文リスト：研究内容：