変異
棒グラフ
gBar(d=D,x=0,y=0,n=0,p=‘d’,lm=’‘,lx=’‘,ly=’‘,lg=’‘,X=’‘,Y=’’,a=0,f=12,c=1,l=F,z=F,k=T,v=F,t=F){
(d:データ,x,y,n:軸,p:配置([d]odge,[s]tack,[f]ill),lm,lx,ly,lg:ラベル,X,Y:並べ替え
a:ラベル角度,f:フォントサイズ,c:パレット番号,l:対数軸,z:軸ゼロ開始,k:数値,v:縦図,t:転置
D=Ip('x45.txt') #簡単な数値行列(4x5)## File: x45.txt / Class: data.frame / Rows: 4 / Columns: 5
##
## A B C D E
## w1 10 19 14 7 12
## w2 11 7 10 0 1
## w3 0 0 1 12 1
## w4 0 1 2 3 3gBar() #棒グラフ
gBar(p='s') #ポジション: [s]tack
gBar(p='f',k=T,v=T) #ポジション: [f]ill
gBar(lx='地域',ly='パーセント',lg='単語') #ラベル
gBar(X='w2,w1,w3,w4',Y='B,A,C,D,E') #並べ替え
gBar(a=90) #X軸を90度回転
gBar(f=15) #f:フォントサイズ
gBar(c=0) #色パレット 0 (白黒)
gBar(c=1) #色パレット 1 (デフォルト)
gBar(c=2) #色パレット 2
gBar(c=3) #色パレット 3
gBar(c=10) #色パレット10
gBar(c='tomato,green,#a19df1,grey,black') #色: 指定
gBar(l=T) #l:対数軸
gBar(k=F) #k:数値なし
gBar(v=T) #v:縦図
gBar(k=T,v=T) #k:数値; v:縦図
gBar()+gBar(t=T) #t:転置
D=Ip('x45L'); Dt() # 簡単なロングフォーム## File: x45L.txt / Class: data.frame / Rows: 20 / Columns: 3
##
## v1 v2 n
## 1 w1 A 10
## 2 w1 B 19
## 3 w1 C 14
## 4 w1 D 7
## 5 w1 E 12
## 6 w2 A 11
## 7 w2 B 7
## 8 w2 C 10
## 9 w2 D 0
## 10 w2 E 1## Class: data.frame / Rows: 20 / Columns: 3
##
## v1 v2 n
## 1 w1 A 10
## 2 w1 B 19
## 3 w1 C 14
## 4 w1 D 7
## 5 w1 E 12
## 6 w2 A 11
## 7 w2 B 7
## 8 w2 C 10
## 9 w2 D 0
## 10 w2 E 1gBar(x=1,y=2,n=3) # ロングフォームの場合x, y,n を指定
ファセット棒グラフ
gBarFacet(d=D,x=0,y=0,n=0,lx=’‘,ly=’‘,X=’‘,Y=’’,a=0,e=F,f=12,c=1,l=F,z=F,k=F,v=F,t=F)
(d:データ,x,y,n:軸,lx,ly:ラベル,X,Y:並べ替え
a:ラベル角度,e:縦ファセット,f:フォントサイズ,c:パレット番号,l:対数軸,z:軸ゼロ開始,k:数値,v:縦図,t:転置
D=Ip('x45') #簡単な例(数値行列:4x5)## File: x45.txt / Class: data.frame / Rows: 4 / Columns: 5
##
## A B C D E
## w1 10 19 14 7 12
## w2 11 7 10 0 1
## w3 0 0 1 12 1
## w4 0 1 2 3 3gBarFacet() #データ読み込み 
gBarFacet(k=T,v=T) #ポジション: [f]ill
gBarFacet(lm='Faceta\n',lx='Estilo',ly='Palabra') #ラベル
gBarFacet(X='w2,w1,w3,w4',Y='B,A,C,D,E') #並べ替え
gBarFacet(a=90) #a:ラベル角度
gBarFacet(e=T) #e:縦ファセット
gBarFacet(f=15) #f:フォントサイズ
gBarFacet(c=0) #色パレット 0 (白黒)
gBarFacet(c=1) #色パレット 1 (デフォルト)
gBarFacet(c=2) #色パレット 2
gBarFacet(c='tomato,green,#a19df1,grey,black') #色: 指定
gBarFacet(l=T) #l:対数軸
gBarFacet(k=F) #k:数値なし
G=gBarFacet()+gBarFacet(t=T); G #t:転置
D=Ip('x45L'); Dt() # ロング形式## File: x45L.txt / Class: data.frame / Rows: 20 / Columns: 3
##
## v1 v2 n
## 1 w1 A 10
## 2 w1 B 19
## 3 w1 C 14
## 4 w1 D 7
## 5 w1 E 12
## 6 w2 A 11
## 7 w2 B 7
## 8 w2 C 10
## 9 w2 D 0
## 10 w2 E 1## Class: data.frame / Rows: 20 / Columns: 3
##
## v1 v2 n
## 1 w1 A 10
## 2 w1 B 19
## 3 w1 C 14
## 4 w1 D 7
## 5 w1 E 12
## 6 w2 A 11
## 7 w2 B 7
## 8 w2 C 10
## 9 w2 D 0
## 10 w2 E 1gBarFacet(x=1,y=2,n=3,k=T) #x,y,nを指定
gBarFacet(x=1,y=2,n=3,k=T)+gBarFacet(x=1,y=2,n=3,k=T,t=T) #t:転置
線グラフ
gLine(d=D,x=0,y=0,n=0,lx=’‘,ly=’‘,lg=’‘,X=’‘,Y=’’,u=0,a=0,f=12,c=1,l=F,z=F,k=F,v=F,t=F)
(d:データ,x,y,n:軸,lx,ly,lg:ラベル,X,Y:並べ替え,u:線結合ラベル(0:なし,1:左,2:右,3:左右)
a:ラベル角度,f:フォントサイズ,c:パレット番号,l:対数軸,z:軸ゼロ開始,k:数値,v:縦図,t:転置
D=Ip('x45.txt') #簡単な例(数値行列:4x5)## File: x45.txt / Class: data.frame / Rows: 4 / Columns: 5
##
## A B C D E
## w1 10 19 14 7 12
## w2 11 7 10 0 1
## w3 0 0 1 12 1
## w4 0 1 2 3 3gLine(k=T) #数値
gLine(lx='単語',ly='頻度',lg='地域') #ラベル
gLine(X='w2,w1,w3,w4',Y='B,A,C,D,E') #並べ替え
gLine(a=90) #a=90:ラベル角度
gLine(f=15) #f=15:フォントサイズ
gLine(c=0) #色パレット 0(白黒)
gLine(c=1) #色パレット 1(デフォルト)
gLine(c=2) #色パレット 2
gLine(c='tomato,green,#a19df1,grey,black') #色: 指定
gLine(l=T) #l:対数軸
gLine(k=T) #k:数値
gLine(v=T) #v:縦図
gLine(u=1) #u=1:レベル結合線(左)
gLine(u=2) #u=2:レベル結合線(右)
gLine(u=3) #u=3:レベル結合線(左右)
gLine()+gLine(t=T) #t:転置
gLine(k=T,v=T,lx='Palabra',lg='Zona') #k:数値; v:縦図
D=Ip('x45L') # ロングフォーム## File: x45L.txt / Class: data.frame / Rows: 20 / Columns: 3
##
## v1 v2 n
## 1 w1 A 10
## 2 w1 B 19
## 3 w1 C 14
## 4 w1 D 7
## 5 w1 E 12
## 6 w2 A 11
## 7 w2 B 7
## 8 w2 C 10
## 9 w2 D 0
## 10 w2 E 1gLine(x=1,y=2,n=3)+gLine(x=1,y=2,n=3,k=T,t=T) #t:転置
?caith; D=caith; Dt() #データ例(1):イギリス人の目と髪の色(データフレーム)## starting httpd help server ... done## Class: data.frame / Rows: 4 / Columns: 5
##
## fair red medium dark black
## blue 326 38 241 110 3
## light 688 116 584 188 4
## medium 343 84 909 412 26
## dark 98 48 403 681 85gLine() #数値行列
面グラフ
gArea(d:データ,x,y,n:軸,p:配置([d]odge,[s]tack,[f]ill),lx,ly,lg:ラベル,X,Y:並べ替え
a:ラベル角度,f:フォントサイズ,c:パレット番号,l:対数軸,z:軸ゼロ開始,k:数値,v:縦図,t:転置
D=Ip('x45') #簡単な例(数値行列:4x5)## File: x45.txt / Class: data.frame / Rows: 4 / Columns: 5
##
## A B C D E
## w1 10 19 14 7 12
## w2 11 7 10 0 1
## w3 0 0 1 12 1
## w4 0 1 2 3 3gArea(p='s') #ポジション: [s]tack
gArea(p='f',k=T,v=T) #ポジション: [f]ill
gArea(p='f',lx='単語',ly='パーセント',lg='地域')
gArea(X='w2,w1,w3,w4',Y='B,A,C,D,E') #X,Y軸並べ替え
gArea(a=90) #a:ラベル角度=90
gArea(f=15) #f:フォントサイズ=15
gArea(c=0) #色パレット 0 (白黒)
gArea(c=1) #色パレット 1 (デフォルト)
gArea(c=2) #色パレット 2
gArea(c=3) #色パレット 3
gArea(c=10) #色パレット10
gArea(c='tomato,green,#a19df1,grey,black') #色: 指定
gArea(l=T) #l:対数軸
gArea(k=F) #k:数値なし
gArea(v=T) #v:縦図
gArea(k=T,v=T) #k:数値; v:縦図
gArea()+gArea(t=T) #t:転置
D=Ip('x45L')## File: x45L.txt / Class: data.frame / Rows: 20 / Columns: 3
##
## v1 v2 n
## 1 w1 A 10
## 2 w1 B 19
## 3 w1 C 14
## 4 w1 D 7
## 5 w1 E 12
## 6 w2 A 11
## 7 w2 B 7
## 8 w2 C 10
## 9 w2 D 0
## 10 w2 E 1gArea(x=1,y=2,n=3) # ロングフォーム
ヒストグラフ Histografía
gHist(df=D,x=1,g=0,p=‘d’,lx=’‘,ly=’’,b=10,f=10,zx=F,nm=F,v=F)
df,x:x軸列,g:グループ列,p:[d]odge,[s]tack,[f]ill),lx,ly:ラベル(x,y)，
b:棒数,zx:0を含むx軸,f:フォントサイズ,nm:数値出力,v:縦図
D=iris; Dt() #アヤメ(データフレーム)## Class: data.frame / Rows: 150 / Columns: 5
##
## Sepal.Length Sepal.Width Petal.Length Petal.Width Species
## 1 5.1 3.5 1.4 0.2 setosa
## 2 4.9 3.0 1.4 0.2 setosa
## 3 4.7 3.2 1.3 0.2 setosa
## 4 4.6 3.1 1.5 0.2 setosa
## 5 5.0 3.6 1.4 0.2 setosa
## 6 5.4 3.9 1.7 0.4 setosa
## 7 4.6 3.4 1.4 0.3 setosa
## 8 5.0 3.4 1.5 0.2 setosa
## 9 4.4 2.9 1.4 0.2 setosa
## 10 4.9 3.1 1.5 0.1 setosagHist()#データ=iris,x軸=1列('Sepallength')
gHist(c=0)#c=0:白黒
gHist(c=2)#c=1~10:カラー
gHist(x=1,g=5)#g:グループ=5列
gHist(x=1,g=5,c=0)#g:グループ=5列,色パレット:0 (白黒)
gHist(x=1,g=5,c=1)#g:グループ=5列,色パレット:1 (デフォルト)
gHist(x=1,g=5,c=2)#g:グループ=5列,色パレット:2
gHist(x=1,g=5,p='s')#p:配置=Stack
gHist(x=1,g=5,p='f')#p:配置=Fill
gHist(x=1,g=5,p='f',k=T)#Fill; k=T:数値
gHist(x=1,g=5,lx='Sepal length',ly='Count',lg='Species')#lx,ly:ラベル(x,y)
gHist(x=1,g=5,f=15)#f:フォント=15
gHist(x=1,g=5,z=T)#z:ゼロを含む軸=T
gHist(x=1,g=5,k=T)#k:数値=T
gHist(x=1,g=5,k=T,v=T)#同+v:縦
—–
(東京大学 上田博人 Hiroto Ueda, 2022)