PL/SQL pour calcul vectoriel

Version imprimable

19/09/2012, 17h56
amani123

PL/SQL pour calcul vectoriel

Bonjour

j'ai une table qui contient distinctes positions de coordonnées (X,Y) et je voulais pour un point C de coordonnées (xc, yc) déterminer la position la plus proche depuis la table prédéfinie

comment je peux le faire?

merci d'avance pour votre aide
20/09/2012, 07h36
StringBuilder

La distance entre deux points se calcule à l'aide du théorème de Pythagore :

Code:

sqrt(pow(xa - xb, 2) + pow(ya - yb, 2))

Il suffit ensuite de rechercher l'ensemble des points pour lesquels cette valeur est minimal par rapport au point donné.

Il faudra faire une sous-requête.

PS : On peut simplifier le calcul en ne faisant pas la racine carrée. En effet, la somme des carrés et la racine carrée de la somme des carrés croissent en même temps.
20/09/2012, 10h47
amani123

Merci pour la réponse

je ne suis pas forte en dev :( comment pourrais je traduite ça en procédure SQL?
20/09/2012, 10h53
al1_24

Présente nous ta requête, nous t'aiderons à la corriger.

Au fait , en utilisant l'algo ci-dessus, tu pourra t'inspirer de ce code (Attention, j'ai pas encore eu le temps de l'exécuter, faut vérifier la syntaxe)

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
25
26
27
28
29
30
31
32
33
34
35
 
CREATE OR REPLACE PROCEDURE tmp_teste(xinput IN REAL, yinput IN REAL)  IS
cursor my_cursor is
       select 
                X,Y
       from
                TPosition;
--my_cursor val%rowtype;
distance_min REAL;
BEGIN
   indicateur_tmp REAL;
   init_distance_min NUMERIC := 0;/*Initialisation de la variable distance_min*/
   for tmp_val in my_cursor
   loop
      indicateur_tmp := sqrt(power(xinput - tmp_val.X, 2) + power(yinput - tmp_val.Y, 2));
      if init_distance_min = 0 /*Execution une seule fois*/
      then
          distance_min := indicateur_tmp; /*Initialisation du distance_min*/
          init_distance_min := init_distance_min + 1;
      else
          if indicateur_tmp < distance_min
          then
            distance_min = indicateur_tmp;
          end if;
      end if;
   end loop;
   bms_output.put_line('Distance min = '|| to_char(distance_min));
   EXCEPTION
     WHEN NO_DATA_FOUND THEN
       NULL;
     WHEN OTHERS THEN
       -- Consider logging the error and then re-raise
       RAISE;
END tmp_teste;
/

20/09/2012, 20h39
mnitu

Bref, à part la syntaxe approximative et l'algorithme discutable vous avez réussi à donner un bon exemple d'un très mauvais gestionnaire d'exception.
21/09/2012, 07h45
fiberMan

Citation:

Bref, à part la syntaxe approximative et l'algorithme discutable vous avez réussi à donner un bon exemple d'un très mauvais gestionnaire d'exception.

Ouai, on pourra le dire , mais là n'est pas la question. C'est n'est qu'un exemple.

Bonjour,

Voila une solution simple :

Code:

1
2
3
4
5
6
7
8
with ma_requete as
(
select xa , ya , sqrt(pow(xa - xb, 2) + pow(ya - yb, 2)) dis
  from ma_table
)
select *
  from ma_requete
 where dis =  ( select min(dis) from ma_requete);

Bonne Fin de semaine.

Khalid