# setf:父のディプロタイプの集合。アレルの集合(ホモなら要素数１、ヘテロなら要素数２) # setm:母のディプロタイプの集合 # seto:子のディプロタイプの集合 # 父母カップル LikeTrio<-function(setf,setm,seto){ couple<-setf*setm cnt<-0 for(i in couple…

これはゴールデンウィークの宿題。とにかく、実用的な軽さまで、なんとか。 与えられるのは 家系図 複数のローカス ローカスごとのジェノタイプ(ディプロタイプ) 家系図構成員の(一部の)それ ローカスごとの「集団」のジェノタイプ頻度 手順 家系図から、核…

IdentifilerというDNA鑑定キットがある １５個のSTRマーカーを使う それの日本人のアレル頻度に関しては、J Forensic Sci. 50(3): 718-719の報告がある。ちなみにSTR頻度に関してこちらのサイトもある 日本人2700ハプロイド(1350人)の情報である これから、…

2010年4月より隔月で法数学勉強会が京大医学部法医学教室によって開かれています。 8月の会で話す予定。 そのドラフト(こちらよりリンクを辿ります)。