Bonsoir,
J'ai à ma disposition une assez conséquente base de données, liée, en bref, aux données océanographiques et dont voici un aperçu ci dessous.
J'a besoin de représenter sur une carte satellite et grâce au package GGMAP, certaines de mes données. À savoir, le déplacement de 3 balises dans l'océan, prises si possible de façon aléatoire.
Pour le moment, j'ai procédé ainsi :
1 2 3 4 5 6 7
| library(ggmap)
Mymap = get_map(location = 'San Francisco', zoom = 4, maptype = 'satellite')
balises=subset(datau, datau$PLATFORM %in% c('4900588','2901115', '4900326'))
G=data.frame(balises$LONGITUDE..degree_east., balises$LATITUDE..degree_north.)
ggmap(Mymap) + geom_point(data=G,
aes(balises$LONGITUDE..degree_east.,balises$LATITUDE..degree_north.),
col=rgb(1-((min(balises$LATITUDE..degree_north.)-balises$LATITUDE..degree_north.))/(min(balises$LATITUDE..degree_north.)-max(balises$LATITUDE..degree_north.)), 0, ((min(balises$LATITUDE..degree_north.)-balises$LATITUDE..degree_north.))/(min(balises$LATITUDE..degree_north.)-max(balises$LATITUDE..degree_north.)))) |
Voici le résultat obtenu :
Le code est bon et fonctionne, mais j'aurais aimé y apporter certaines modifications. Premièrement, les balises ont été choisies manuellement, ce qui n'était pas dans mes prévisions. J'ai essayé de remplacer le choix de mes balises par une simple formule "sample" mais ça n'est pas concluant. J'ai donc remplacé cette partie de code par celle du dessous.
balises=subset(datau, datau$PLATFORM %in% c('4900588','2901115', '4900326'))
balises= datau[sample(1:nrow(datau), 3),]
Mais le problème étant que 3 lignes uniquement sont tirées au sort. C'est-à-dire que je n'ai qu'une seule valeur pour chaque balise, là où il devrait y en avoir des centaines. Et la carte obtenue est la suivante :
Ainsi, comment faire pour avoir toutes les lignes des balises tirées au sort ?
___________________________________________________________________________
Et enfin, par rapport aux couleurs, je me suis démerdé pour écrire une formule me permettant d'avoir un changement de couleur, proportionnellement aux valeurs de la latitude. J'aurais aimé avoir ce même résultat, mais par balise, et selon leur déplacement.
Simplement, je débute encore sur R et malgré pas mal d'essais, je n'y arrive vraiment pas. J'ai essayé de m'aider de la colonne "Date", mais le format n'est pas compatible et difficilement convertible.
Merci à ceux qui prendront le temps de m'aider et n'hésitez pas à me reprendre ou à me demander des informations complémentaires, je peut être assez maladroit parfois dans ma façon de faire
Partager