2015-08-01から1ヶ月間の記事一覧

gitの使いかた

git

gitの使いかた初期設定 git config --global user.name 名前 [h.watanabe@food program]$ git config --global user.email Eメール ディレクトリを登録 mkidir test cd test git init ファイルを作成 test.txt 状態を確認 1689 git status インデックスに登…

rubyで数値計算 更新版. ruby-gslの導入

rubyで数値計算を行うためにrb-gslを導入する. 古い記事 http://d.hatena.ne.jp/arupaka-_-arupaka/20091024/1256391373 では情報が古くなったので、更新.(1)gslのソースをとってくる->インストール 1064 cd 1065 wget http://mirror.jre655.com/GNU/gsl/g…

Rでボックス幅を自動調整した密度分布

R

density4<-function(z1,v=seq(-10,10,length.out=120),base_dx=0.04,min_count=3,smooth=TRUE){ #v<-sample(unique(z1),100) #v<-seq(-10,10,length.out=120) #base_dx<-0.04 count<-NULL dx_b<-NULL cou_c<-min_count cou_b<-NULL for(i in 1:length(v)){ j2…

Rのtapplyで各曜日ごとの平均を調べる

R

Rのtapplyで各曜日ごとの平均を調べる tapply(ts1,rep(1:7,length.out=length(ts1)),"mean") 簡易的な週ごとの平均結果 1 2 3 4 5 6 7 174.1370 173.4612 162.5548 138.6849 144.5091 165.8032 172.0847

Rのtapplyラベルごとの平均を求める.

R

例えばラベルごとの平均を求める. label<-c(1,3,2,3,2,1,1,2,3) data<-c(23,13,43,52,32,21,0,21,51) f1<-tapply(v1,v0,mean) f1 plot(names(f1),f1) 出力 1 2 3 14.66667 32.00000 38.66667

$ curl -i http://ebisufan.com/news/wp-content/uploads/2013/03/tanuki019.jpg | ruby -ne 'BEGIN{v=1;f=open("tmp5","w");f2=open("tmp6.jpg","w");};if v==1; then f.print $_; if $_.chomp! =~ /^$/ then;v=0; end; else f2.print $_ end;'