calcul de distance entre deux points.
Bonjour le forum.
Je sollicite encore une fois votre aide.
En fait j'ai une liste d'intron et une liste de position de sites H.
Sachant qu'un intron peux avoir 1 ou plusieurs sites H.
Je veux calculer la distance entre le début de l'exon et le site H s'il y a en qu'1 dans l'intron.
Ou la distance entre le premier site H et le début de l'intron et la distance entre les sites H s'il y a plusieurs site H dans un intron.
J'ai essayer de le faire mais j'ai des résultats qui sont aberrants.
Quelqu'un pourrais m'aider?
Je vous mets un bout de mon code, la partie ou je vait les calculs!
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
| if (($intron_chr_start <= $polyA_signal_pos) and ($polyA_signal_pos <= $intron_chr_end)){
#print "intron_chr_start : $intron_chr_start\n ";
#print "intron_chr_end : $intron_chr_end\n ";
#print "polyA_signal_pos : $polyA_signal_pos \n";
my @polyA_signal_pos;
push (@polyA_signal_pos, $polyA_signal_pos);
my @liste_polya_int;
push (@liste_polya_int, $polyA_signal_pos[$i++]);
unshift (@liste_polya_int, $intron_chr_start);
push (@liste_polya_int, $intron_chr_end);
for( my $j=0; $j< $#liste_polya_int; $j++){
my $distance_entre_polya =$liste_polya_int[$j+1] - $liste_polya_int[$j] ;
print "distance_entre_polya : $distance_entre_polya\n ";
print "liste_polya_int[+1] : $liste_polya_int[$j]\n ";
print "liste_polya_int : $liste_polya_int[$j+1]\n ";
} |
