2017-07-18 14 views
2

接尾辞 "-r1i1p1_rcp45"と "-r1i1p1_rcp85"を文字ベクトル文字列に追加したいと考えていますが、すべてのmodel.list値の末尾に、接尾辞ごとに別々の値があります。これは、紛らわしいかもしれ、そう....ベクトル文字列に複数の接尾辞を追加する方法

マイベクトル文字列は次のとおりです。

model.list <- c("ACCESS1-0", "ACCESS1-3", "bcc-csm1-1", "bcc-csm1-1-m") 

そして今、これらの接尾辞を追加するために私のコードを読み取ります

gcm<- paste(model.list, "-r1i1p1_rcp45", "-r1i1p1_rcp85", sep = "") 

が、出力(としての予想される)を与える:

> gcm 
[1] "ACCESS1-0-r1i1p1_rcp45-r1i1p1_rcp85" "ACCESS1-3-r1i1p1_rcp45- 
r1i1p1_rcp85" 
[3] "bcc-csm1-1-r1i1p1_rcp45-r1i1p1_rcp85" "bcc-csm1-1-m-r1i1p1_rcp45- 
r1i1p1_rcp85" 

を私は次のように出力を見てみたい:

> gcm 
[1] "ACCESS1-0-r1i1p1_rcp45" "ACCESS1-0-r1i1p1_rcp85" 
[3] "ACCESS1-3-r1i1p1_rcp45" "ACCESS1-3-r1i1p1_rcp85" 
[5] "bcc-csm1-1-r1i1p1_rcp45" "bcc-csm1-1-r1i1p1_rcp85" 
[7] "bcc-csm1-1-m-r1i1p1_rcp45" "bcc-csm1-1-m-r1i1p1_rcp85" 
+2

これはやる: 'paste0(担当者(model.list、各= 2)、C( " - r1i1p1_rcp45"、 "-r1i1p1_rcp85" )) ')。 – lmo

答えて

1

あなたがそれらを個別に行う必要がある。

> model.list2=c(paste0(model.list, "-r1i1p1_rcp45"), paste0(model.list, "-r1i1p1_rcp85")) 
> model.list2 
[1] "ACCESS1-0-r1i1p1_rcp45" "ACCESS1-3-r1i1p1_rcp45" "bcc-csm1-1-r1i1p1_rcp45" "bcc-csm1-1-m-r1i1p1_rcp45" 
[5] "ACCESS1-0-r1i1p1_rcp85" "ACCESS1-3-r1i1p1_rcp85" "bcc-csm1-1-r1i1p1_rcp85" "bcc-csm1-1-m-r1i1p1_rcp85" 
関連する問題