柏/SoftwareRef/R の履歴(No.10)

• 履歴一覧
• 差分 を表示
• 現在との差分 を表示
• ソース を表示
• 柏/SoftwareRef/R へ行く。
  • 1 (2013-01-29 (火) 17:30:55)
  • 2 (2013-01-29 (火) 17:36:42)
  • 3 (2013-02-05 (火) 14:42:06)
  • 4 (2013-02-07 (木) 10:19:13)
  • 5 (2013-02-16 (土) 18:15:53)
  • 6 (2013-02-16 (土) 22:25:11)
  • 7 (2013-02-17 (日) 02:13:20)
  • 8 (2013-04-07 (日) 07:47:40)
  • 9 (2013-04-07 (日) 14:57:47)
  • 10 (2013-04-29 (月) 15:07:52)
  • 11 (2013-06-12 (水) 04:39:33)

柏/SoftwareRef

memo†

入力†

• csv読み込み
  Time<-read.csv("/Users/s141015/Dropbox/myfolder/research/学会/SES/exp/データ/アホモデル/all-a+1/comp1,2/Compare_time.csv",header=FALSE)
  • option
    • 列名：row.names=1

データ加工†

• 併合
  rbind
  cbind
  

plot†

• 棒グラフ
  barplot()
  • 列名利用：names.arg=rownames(a)
  • 題名：main=colnames(a[1])
• 散布図
  plot()

x軸の目盛†

• 斜めに
  a<-barplot(t(B[2]))
  text(a, -.01, t(B[1]), srt = 45, adj = c(1, 1), xpd = TRUE)
  

複数の変数と比較†

• データの方向が縦
  x<-rbind(,)
  barplot(x,beside=True)

パラメータ†

• 線の太さ
  lwd=数字
• 色
  col="色"
• ラベル名
  names=c(,,,,,)
• ラベル名の回転
  las=数字
  0:通常
  1:水平
  2:xが垂直,yが水平
  3:垂直
  4:xが水平,yが垂直
  

線を挿入†

lines(x,y)

qcc†

• パレート図
  
  • 簡易
    library(qcc)
    pareto.chart(x)
    
  • 一般 パレート図
    a<-barplot(t(B[1]),lwd=2, las=1,ylim=c(0,120),xlim=c(0,30),col="white")
    par(new=T)
    plot(a,t(B[2]),type="o",axes=F,xlab="",ylab="",ylim=c(0,100),xlim=c(0,30))
    axis(side=4,lwd=2,las=1)
    

出力†

• 多行多列プロット
  par(mfrow=c(m,n))
  plot.....
  
• 簡易
  dev.copy2eps(file="ファイル名.eps")
  dev.copy2pdf(file="ファイル名.pdf")
  
• 一般
  • eps
    setEPS() #いらんかも
    postscript("hoge.eps", family="Japan1GothicBBB")
    curve(...) # 図を描く
    dev.off() ~
  • jpeg
    jpeg("test.jpg",width = 1500,height = 900)
    図を書く
    dev.off()~
• フォント指定 par(family="")
  

• フォント一覧 Hiragino Mincho Pro W3
  Hiragino Mincho Pro W6
  Hiragino Mincho Pro W3
  Hiragino Mincho Pro W6
  Hiragino Kaku Gothic Pro W3
  Hiragino Kaku Gothic Pro W6
  Hiragino Kaku Gothic Pro W3
  Hiragino Kaku Gothic Pro W6
  
  • pdf用
    Japan1
    Japan1GothicBBB
    Japan1HeiMin
    

• 文字の大きさ指定
  par(ps = 28)