Changes between Version 4 and Version 5 of parcours RHT

Timestamp:

Oct 24, 2011 10:09:24 PM (14 years ago)

Author:

cedric

Comment:

--

parcours RHT

@@ -5 +5 @@
 Le parcours est fait dans R par la méthode distance_sea.R voir main_RHT_France.R
 {{{
-pour des raisons d'efficacité on sauve un texte depuis R et on recharge en sql
-Sauvegarde sous R
-write.table(rht@data[,c("id_drain","ltree_from_sea","dmer")],file=str_c(datawd,"/dataEDArht/rht_ltree_distance.csv"),sep=";",row.names=FALSE)
-Restauration en sql
+#!sql
+--pour des raisons d'efficacité on sauve un texte depuis R et on recharge en sql
+--Sauvegarde sous R
+--write.table(rht@data[,c("id_drain","ltree_from_sea","dmer")],file=str_c(datawd,"/dataEDArht/rht_ltree_distance.csv"),sep=";",row.names=FALSE)
+--Restauration en sql
 create table rht.temp_ltree_distance(
         id_drain integer primary key,
@@ -20 +21 @@
 select text2ltree(ltreetext) as chemin,id_drain from rht.temp_ltree_distance) as sub
 where t.id_drain=sub.id_drain;
+
+-- mise à jour des distances mer
+
+update rht.rht_topology t set dmer=sub.distance from (
+select distance,id_drain from rht.temp_ltree_distance) as sub
+where t.id_drain=sub.id_drain
+and dmer is null;
 }}}