Code covered by the BSD License  

Highlights from
CODIS

image thumbnail

CODIS

by

 

14 May 2009 (Updated )

Combined DNA Index System: a GUI tool for forensic paternity lawsuit

freq.m
PI=zeros(24,3);
%CSF1PO
x=[0.29 2.77 27.99 31.78 30.76 5.98 0.44]./100;
out=tpi(x); PI(1,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D10S1248
x=[0.58 3.5 29.45 29.74 19.39 13.41 3.64 0.29]./100;
out=tpi(x); PI(2,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D12S391
x=[4.37 3.35 10.35 1.9 16.18 2.19 12.54 0.58 9.77 0.15 13.56 0.15 10.79 8.16 3.64 1.9 0.29 0.15]./100;
out=tpi(x); PI(3,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D13S317
x=[0.15 10.93 7.14 6.85 29.01 30.46 10.64 4.52]./100;
out=tpi(x); PI(4,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D16S539
x=[1.46 12.68 4.08 32.22 30.9 16.76 1.75 0.15]./100;
out=tpi(x); PI(5,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D18S51
x=[1.17 0.87 15.01 11.95 17.64 15.31 11.95 10.79 8.31 4.08 1.31 1.02 0.29 0.29]./100;
out=tpi(x); PI(6,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D19S433
x=[0.15 7.29 0.15 0.15 27.26 1.6 35.13 2.04 16.18 3.5 5.69 0.29 0.29 0.15 0.15]./100;
out=tpi(x); PI(7,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D1S1656
x=[0.29 6.27 15.74 7 6.27 0.29 15.31 8.75 9.33 4.96 4.96 0.29 12.68 0.29 5.98 1.6]./100;
out=tpi(x); PI(8,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D21S11
x=[0.58 2.62 16.76 23.76 0.15 0.15 23.18 2.77 6.85 8.89 2.33 9.62 1.9 0.44]./100;
out=tpi(x); PI(9,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D22S1045
x=[0.44 13.85 0.58 1.02 3.35 36.3 36.3 7.58 0.58]./100;
out=tpi(x); PI(10,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D2S1338
x=[0.15 0.15 0.15 4.08 18.37 8.31 14.14 15.74 2.92 1.75 10.06 10.2 12.1 1.6 0.29]./100;
out=tpi(x); PI(11,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D2S441
x=[0.58 19.83 33.09 5.1 4.08 0.29 3.35 28.86 4.37 0.44]./100;
out=tpi(x); PI(12,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D3S1358
x=[0.29 0.15 15.16 27.26 24.34 19.68 11.66 1.46]./100;
out=tpi(x); PI(13,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D5S818
x=[0.73 5.39 5.54 33.82 37.61 14.87 1.75 0.29]./100;
out=tpi(x); PI(14,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D7S820
x=[1.31 16.47 16.62 27.26 20.99 14.58 2.33 0.29 0.15]./100;
out=tpi(x); PI(15,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D8S1179
x=[2.04 1.31 10.5 6.71 15.16 33.24 18.8 9.04 2.77 0.44]./100;
out=tpi(x); PI(16,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%FGA
x=[0.15 0.15 1.02 5.69 14.87 0.44 18.22 0.29 19.24 0.87 14.87 0.44 14.43 6.71 1.9 0.58 0.15]./100;
out=tpi(x); PI(17,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%SE33
x=[0.15 0.44 0.15 0.15 0.87 3.64 0.15 3.64 0.15 5.39 6.56 0.15 7.87 8.31 0.29 0.29 5.25 0.87 2.04 1.17 0.58 3.35 2.62 0.15 4.52 3.79 4.52 6.85 7.73 7.87 4.66 2.77 0.44 1.6 0.29 0.15 0.29 0.15 0.15]./100;
out=tpi(x); PI(18,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%TH01
x=[0.15 21.72 17.64 11.37 17.06 31.2 0.87]./100;
out=tpi(x); PI(19,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%TPOX
x=[0.15 50.15 12.97 4.66 28.28 3.79]./100;
out=tpi(x); PI(20,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%vWA
x=[0.15 8.75 12.24 22.3 27.41 17.78 10.06 1.31]./100;
out=tpi(x); PI(21,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%D6S1043
x=[0.18 1.65 26.47 27.94 6.80 4.96 1.10 0.92 6.43 7.90 9.74 5.15 0.55 0.18]./100;
out=tpi(x); PI(22,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
load('4.mat')
%Penta D
out=tpi(CODISpop{16,1}); PI(23,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
%Penta E
out=tpi(CODISpop{17,1}); PI(24,:)=[out.TPItrio.Brenner out.TPItrio.Cardillo out.TPIduo.Cardillo];
clear CODISpop out x

Contact us