list()

• こちらから
• Rでは、複数の「名前のついた情報のまとまり」を返すときには、listで返すことになっている
• 返り値のセットから、特定のものを取り出すには"$"を使う

g2<- function(x){                          
    pattern<- 0                          
    score<- 0                             
    switch(x,                             
           list(pattern= 1,score= 0),  
           list(pattern= 2,score= 2),  
           list(pattern= 3,score= 4), 
           list(pattern= 4,score= 6)   
           )                              
                           
   }
g2out<-g2(3)
g2out
g2out$pattern
g2out$score
-使ってみると：

> g2out
$pattern
[1] 3

$score
[1] 4

> g2out$pattern
[1] 3
> g2out$score
[1] 4
>