galactikdu21 | Bonjour, je travail actuellement sur R, j'ai quelques bases mais je rencontre quelques difficultés à coder.
Je souhaite positionner 7 objets sur une surface donnée (A,B,C,D,E,F,G). En considérant l'objet A comme point de départ et point d'arrivée, j'aimerais connaître la distance à parcourir pour passer une fois par chaque objet (uniquement une fois, donc pas de répétition) et en choisissant toujours d'aller à l'objet le plus proche de celui ou je me trouve. (se rapproche du problème du voyageur de commerce et donc de l'algorithme de Dijkstra). Malheureusement mes bases ne me suffisent pas et j'ai besoin d'aide. Voici le code que j'ai écrit pour le moment qui me permet de générer 7 points aléatoirement sur ma surface donnée et d'obtenir les coordonnées x et y pour chaque point, le tout résumé dans la matrice train. A partir de cela quelqu'un pourrait-il m'aider a mettre en place un code permettant d'obtenir cette distance? Par avance merci pour votre aide.
Code :
- library(spatstat)
- Flow=runifpoint(7,win=owin(c(0,470),c(0,670))) #génère 7 points aléatoirement sur une surface donnée
- plot(Flow) #graphique de la conformation
- X=Flow$x #définit le vecteur X comme contenant les coordonnées x des points générés par runifpoint
- Y=Flow$y #définit le vecteur Y comme contenant les coordonnées y des points générés par runifpoint
- A=c(X[1],Y[1])
- B=c(X[2],Y[2])
- C=c(X[3],Y[3])
- D=c(X[4],Y[4])
- E=c(X[5],Y[5])
- F=c(X[6],Y[6])
- G=c(X[7],Y[7])
- train=rbind(A,B,C,D,E,F,G)
|
|
