R_Alphabet のバックアップの現在との差分(No.1) - アールメカブ

アールメカブ


R_Alphabet のバックアップの現在との差分(No.1)


  • 追加された行はこの色です。
  • 削除された行はこの色です。
[[Rの備忘録]]

アルファベットの組み合わせを文字ベクトルとして作成する方法


 for( i in 0:length(LETTERS)-1 ){
   for(j in 1:3){
  
      cat( paste(LETTERS[j], LETTERS[i+1], sep = ""), i + i*j, "\n" )
    
   } 
 for( i in 0:2 ){
   for(j in 1: length(LETTERS)){
      cat( paste(LETTERS[i+1], LETTERS[j], sep = ""), 
                           i * length(LETTERS) + j, "\n" )
    } 
 }
 AA 1 
 AB 2 
 AC 3 
 AD 4 
 AE 5 
 AF 6 
 AG 7 
 AH 8 
 AI 9 
 AJ 10 
 AK 11 
 AL 12 
 AM 13 
 AN 14 
 AO 15 
 AP 16 
 AQ 17 
 AR 18 
 AS 19 
 AT 20 
 AU 21 
 AV 22 
 AW 23  
 AX 24 
 AY 25 
 AZ 26 
 BA 27 
 BB 28 
 BC 29 
 BD 30
 ...
//paste(LETTERS[rep(1:3, each=26)],LETTERS[rep(1:26, 3)], sep="")

単にアルファベットの組み合わせであれば
 outer(LETTERS, LETTERS, paste, sep = "")