６４-１.遺構・遺物の編年には｢悪魔の証明｣が必要 [６４．古墳の年代をエクセルで決める]
古墳の年代を決める遺構・遺物の編年は、円筒埴輪・須恵器の編年を基準にして作成されており、これらの編年無しでは、古墳の年代は決められないと言っても過言ではない。円筒埴輪・須恵器の編年が古墳の年代決定に重要な役割を果たしているのは、消滅する時期が明確にされているからと考える。ただ円筒埴輪・須恵器の編年は、相対年代（型式の順序）は確かであるが、絶対年代（西暦○○年）は不確かである。近年、古墳年代の決定に年輪年代測定法や炭素１４年代測定法などの科学的手法が取り入れられ、絶対年代の精度が上がって来ている。Ｚ２２５に私が作成した円筒埴輪と須惠器の編年表を示した。
私はこれまでに１９３２基の古墳（前方後円墳９９４基）のデータを集め、７０種の遺構・遺物の編年と照らし合わせて、古墳の年代を決定してきた。しかし、その古墳のデータと古墳年代決定のプログラムをパソコンの故障により消失した。それらのデータとプログラムを再構築することを試み、１４３種の遺構・遺物の編年を行い、３２９４基の古墳データ（前方後円(方)墳１９２２基）を集め、古墳年代を決定した。
古墳研究者にとってのバイブルの本である近藤義郎編『前方後円墳集成』（１９９２年、山川出版社）には、全国５２００余基の前方後円(方)墳が記載されている。私が集めた前方後円墳のデータは３７％である。現在、世の中は「ビッグデータ」を処理して新たな知見を得る時代である。考古学においても１６万基あると言われている古墳をデータベース化して、遺構・遺物の編年を行い、古墳年代を決定する時代がやって来ると考える。私がエクセルを駆使して行ったのは、その片鱗にすぎない。私は運転免許の更新に、認知症検査を受けなければならない年齢に達している。先日幸い合格したが、その先はそれほど長くない。古代史の解明に何かの約に立てばと、その手法を公開しようと思う。
６４-２. 遺構・遺物の編年をコード化 [６４．古墳の年代をエクセルで決める]
古墳年代の決定に用いた１４３種の遺構・遺物の編年表（Ｚ２２６）を巻末に示した。この編年表の年代は、３２９４基の古墳の年代を決める中で、幾度も修正を加えながら決定したものであり、「悪魔の証明」を乗り越えたものである。古墳の年代をエクセルで決定をするために、遺構・遺物の編年表をコード化している。興味のある方は、とりあえず私の手法で作成して、それを修正・追加・削除していただければよいと思う。ブログの表Ｚ２２６を印刷しておくと作業がし易い。
はじめに、エクセルのSheet1［編年表］に、遺構・遺物の編年表（Ｚ２２６）から、Ａ列に「Ｎｏ」を、Ｂ列に「編年要素」、Ｃ列・Ｄ列に「年代」を１行から１４３行までインプットする。なお、「編年要素」で赤字は後で役に立つので赤色で記入すると良い。Sheet1のＡ列・Ｂ列の１４３行までをコピーして、Sheet2[編年コード作成]に、「形式を選択して貼り付ける」をクリックして「行列を入れ替えるテキスト」にマークを入れ貼り付ける。Sheet2の１行・２行を縦書きにするために、１行目を選定して右クリック、「セルの書式設定」の「配置」を選び、「方向」の「度」を「-90」にする。２行目は１行と同じで「方向」の「文字列」をクリックする。2行目の須恵器形式の英数字が書かれたセルは「方向」の「度」を「-90」にすると見やすい。
Sheet2[編年コード作成]のＡ列３行目に「=RIGHT(A1,1)」の命令を入れＮｏ１４３（ＥＭ列）までコピーする。Ａ列を選択して「挿入」をクリックし、Ａ列３行に「西暦」を記入、Ａ列４行に「240」を記入、５行に「=A3+10」の命令を記入し、コピーして「610」まで作成する。始めに１４３編年要素の「240」から「610」までの全てのセルを「0」にしておく。遺構・遺物の編年表（Ｚ２２６）を見ながら、それぞれの「編年要素」について、その存在した年代に「1」を記入していく。その一部を表Ｚ２２７に示した。
遺構・遺物の年代のインプットが終わると「編年コード」の製作に取り掛かる。まず、ＥＯ列（１４３：銅椀の次の列）の３行に「=CONCATENATE( 」の命令を書き、Ｂ列（１：前方後円墳）の３行を左クリックしてから「,」をインピット､次にＣ列（２：前方後方墳）３行を左クリックしてから「,」をインプット、この作業をＥＮ列（１４３：銅椀）まで繰り返し、「=CONCATENATE(B3,C3,D3,・・・・・EL3,EM3,EN3)」の命令を作成する。これをＥＯ列の４１行（Ａ列「610」まで）コピーすれば、１４３の文字列からなる編年コード表が出来る。この命令が間違っていないか、ＥＯ列３行のコードが「1234567890」のセットが１４個あり、最後が「123」となっているかで確認する。Sheet2をコピーして「値」のみをshee3[編年コード]に貼り付け、Ａ列（西暦）とＥＯ列（編年コード）以外を削除し、１行目・２行目を削除すれば、遺構遺物編年コード表（Ｚ２２８）が完成する。
６４-３.古墳の情報をウエブサイトから収集する [６４．古墳の年代をエクセルで決める]
古墳年代の決定は１４３種の遺構・遺物の有無を示す古墳コードと、１４３種の遺構・遺物の編年コードとを付き合せて行っている。ウエブサイトの「遺跡ウォーカー」には、約１０万基の古墳の情報が収められており、目的の古墳名・遺構名・遺物名で古墳の情報を抽出することが出来る。古墳の年代を調べるためには、埴輪型式と須恵器形式のデータを全て収集することが必須である。例えば埴輪I式のデータは「遺跡ウォーカー」の「遺物概要」の欄に「埴輪I式」（「I」は文字のⅠでなく、半角の英文字Iアイ)を記入すると、Ｚ２２９のように２１件の古墳が抽出できる。この一覧から１件ずつ「詳細情報」をクリックすると、Ｚ２３０に示されるような画面で情報が出てくる。
この「詳細情報」をエクセルに取り込み、古墳コードを作成する。「詳細情報」の「古墳名」から「遺物概要」までをコピーして、「貼り付オプション」の「形式を選択して貼り付ける」をクリックして「テキスト」を選択して、Sheet4[古墳リスト作成]のＡ列１行に貼り付ける。そうすると１行のセルに「古墳名」が、２行のセルに「データ（ふりがな～遺物概要）」が貼り付けられるので、２行の「データ」セルを切り取り、Ｂ列1行に貼り付ければ、一つの古墳のデータが収集されたことになる。次の古墳の場合は、Ａ列2行に貼り付け、３行の「データ」をＢ列２行に貼り付ける。この作業を繰り返し行い、埴輪I式のデータを取り込む。
古墳のデータが集まると、Ｃ列１行に「= SEARCH("所在地" ,B1,1)」、Ｄ列１行に「= SEARCH("緯度" ,B1,1)」、Ｅ列１行に「=MID(B1,C1+3,D1-C1-3)」を、Ｆ列１行に「=LEFT(E1,2)」の命令を入れ、Ｃ列１行からＦ列１行までをコピーして、最後の古墳まで貼り付ける。Ｅ列に所在地が、Ｆ列に都道府県名が表示される。Ａ列～Ｆ列をコピーして、どこかの列に「値」のみコピーし、SEARCH命令の2列を削除すると、埴輪I式の「古墳名」「データ」「所在地」「都道府県名」のリストが作成できる。
Sheet5[古墳リスト]の先頭行に、Ａ列「通しＮｏ」、Ｂ列「編年要素」、Ｃ列「整理Ｎｏ」、Ｄ列「古墳名」、Ｅ列「データ」、Ｆ列「所在地」、Ｇ列「都道府県」、Ｈ列「古墳コード」を記入しておく。Sheet4[古墳リスト作成]の「古墳名」「データ」「所在地」のリストをコピーし、Ｄ列2行に貼り付け、Ａ列～Ｃ列を記入し古墳リストを作成する。なお、Sheet4[古墳リスト作成]のＡ列・Ｂ列は消去して、次のデータ収集に使用し、Sheet5[古墳リスト]にデータを溜め込む。Ｚ２３１に古墳リストの一例を示したが、「データ」のセルは短いが、このなかにデータ（ふりがな～遺物概要）の全てが入っている。この「データ」のセルから情報を引き出し、古墳の遺構・遺物の有無をコード化する。
６４-４.古墳の遺構・遺物の有無をコード化 [６４．古墳の年代をエクセルで決める]
古墳コードを作成する方法は、Sheet２[編年コード作成]の先頭行から3行コピーして、Sheet6[古墳コード作成]に貼り付け、「前方後円墳」の列がＩ列になるよう、６列挿入する。Ｉ列の4行目に「=IF(IFERROR(SEARCH("",$E4,1),0)>0,1,0)」の命令を記入し、「前方後円墳」のＩ列から「銅椀」のＥＵ列までコピーしておく。Ｚ２３２に示すように、Ｉ列の３行目のセル「前方後円墳」をクリックして、ボードに表示される横文字の「前方後円墳」をドラッグしてコピーし、Ｉ列４行目の「=IF(IFERROR(SEARCH("",$E4,1),0)>0,1,0)」の命令「""」の中に貼り付ける。この作業をＥＵ列の「銅椀」まで繰り返す。ただし、編年要素名に赤字があるときは、赤字はコピーしない。また、埴輪の型式は文字ではなく、半角の英大文字のI(アイ)とV(ヴイ)を組み合わせた文字(I,II,III,IV,V）とする。
また、余分なデータを拾い出さないように、Ｌ列「造出」の４行目は、
「=IF(IFERROR(SEARCH("造出なし",$E4,1),0)>0,0,IF(IFERROR(SEARCH("造出",$E4,1),0)>0,1,0))」に、
ＢＫ列「鏡」の４行目は、
「=IF(IFERROR(SEARCH("鏡板",$E4,1),0)>0,0,IF(IFERROR(SEARCH("鏡",$E4,1),0)>0,1,0))」に、
ＣＷ列「楕円形」の４行目は同じ命令で"楕円形埴輪"と"楕円形"に、ＥＴ列「子持」の４行目は"子持勾玉"と"子持"に書き改める。最後に「コード」のＥＶ列3行目の命令「=CONCATENATE(I3,J3,K3,・・・・・ES3,ET3,EU3)」を4行目にコピーしておく。
なお、三角縁神獣鏡の型式（Ａ段階～Ｄ段階）と倭製三角物神獣鏡の型式（Ⅰ段階～Ｖ段階）は「遺跡ウォーカー」のデータには記載されていない。私は福永伸哉著『三角縁神獣鏡の研究』の最後にある「三角縁神獣鏡一覧」をもとに、Sheet6[古墳コード作成]のＥ列「データ」の最後に、型式の「Ａ段階」～「Ⅴ段階」の文字を書き入れている。また、「遺跡ウォーカー」のデータには「初期横穴式石室」の表現はない。埴輪型式がⅡ式・Ⅲ式・Ⅳ式で横穴式石室の場合は、「初期横穴式石室」といえるので、それらについては「横穴式石室」のＰ列を強制的に「0」にして、「初期横穴式」のＯ列を「1」にする。
後はSheet5の古墳リストをＡ列～Ｈ列に見出しが３行目になるように貼り付け、４行目のＩ列からＥＶ列をコピーして、古墳リストの最後の行まで貼り付けると、ＥＶ列に１４３桁の古墳コードが出来上がる。古墳コードを４行目以降終りまでコピーして、Ｈ列４行目に「値」のみを選択して貼り付ける。そして、Sheet6[古墳コード作成]のＡ列～Ｈ列をコピーしてSheet7[古墳コード一覧]に貼り付ける。Ｉ列を「０」で埋めておくと、古墳コードがはみ出さず見やすい。以上がウエブサイトの「遺跡ウォーカー」より古墳の情報を抽出し、古墳コードを作成する方法である。
古墳コードに誤った情報が入ると、古墳年代の確定が狂ってくる。例えば、古墳が築造された後に造られた石槨や石室（第２主体以降）の副葬品のデータも入っている。須恵器は横穴式石室の追葬、墳上祭祀、周濠・墳丘への混入などで、後世のものが遺物として多く出土している。また、須恵器の器種の「高杯・ハソウ・短頸壺・長頸壺」は土師器ものも抽出している。これらは、プログラムでは自動的に排除できない。年代決定を行った際、年代の決定に矛盾が生じる結果が出るので、その際「データ」の内容を読んで、Sheet6[古墳コード作成]で、該当の項目のセルの「１」を強制的に「0」に書き換えればよい。
「遺跡ウォーカー」以外の資料から古墳コードを作成する場合は、Sheet6[古墳コード作成]で、Ａ列「通しＮｏ」、Ｂ列「編年要素」、Ｃ列「整理Ｎｏ」、Ｄ列「古墳名」、Ｆ列「所在地」、Ｇ列「都道府県」、Ｈ列「古墳コード」を記入し、Ｅ列に「データ」として資料にある古墳の遺構・遺物のデータを記載すれば良い。その順序はランダムで良いが、その記載する遺構・遺物の名称には、編年コード表に記載した編年要素名（赤字を除く）が使われていなければならない。もちろん、“三角縁神獣鏡”のように、その編年要素名「三角縁」の前後に名称が付いていてもあっても構わない。円筒埴輪の型式は英文字半角の「I,II,III,IV,V」であることに注意が必要である。
