comparison scoring function/KinatestFisherScoring.R @ 12:3437c03bb21e draft

Uploaded
author jfb
date Thu, 03 Oct 2019 11:00:05 -0400
parents 153ed20b5aab
children
comparison
equal deleted inserted replaced
11:7dff31e9a48f 12:3437c03bb21e
1004 FLT3Numeration<-c(FLT3m6[s],FLT3m5[r],FLT3m4[i],FLT3m3[j],FLT3m2[k],FLT3m1[l],FLT3d0[m],FLT3p1[n], 1004 FLT3Numeration<-c(FLT3m6[s],FLT3m5[r],FLT3m4[i],FLT3m3[j],FLT3m2[k],FLT3m1[l],FLT3d0[m],FLT3p1[n],
1005 FLT3p2[o],FLT3p3[p],FLT3p4[q],FLT3p5[u],FLT3p6[v]) 1005 FLT3p2[o],FLT3p3[p],FLT3p4[q],FLT3p5[u],FLT3p6[v])
1006 ALKNumeration<-c(ALKm6[s],ALKm5[r],ALKm4[i],ALKm3[j],ALKm2[k],ALKm1[l],ALKd0[m],ALKp1[n], 1006 ALKNumeration<-c(ALKm6[s],ALKm5[r],ALKm4[i],ALKm3[j],ALKm2[k],ALKm1[l],ALKd0[m],ALKp1[n],
1007 ALKp2[o],ALKp3[p],ALKp4[q],ALKp5[u],ALKp6[v]) 1007 ALKp2[o],ALKp3[p],ALKp4[q],ALKp5[u],ALKp6[v])
1008 1008
1009 ThisKinPeptides[count,1:13]<-ThisKinTableNumeration 1009 ThisKinPeptides[count,1:13]<-as.numeric(ThisKinTableNumeration)
1010 1010
1011 AblPeptides[count,1:13]<-AblNumeration 1011 AblPeptides[count,1:13]<-AblNumeration
1012 ArgPeptides[count,1:13]<-ArgNumeration 1012 ArgPeptides[count,1:13]<-ArgNumeration
1013 BtkPeptides[count,1:13]<-BtkNumeration 1013 BtkPeptides[count,1:13]<-BtkNumeration
1014 CskPeptides[count,1:13]<-CskNumeration 1014 CskPeptides[count,1:13]<-CskNumeration