réalisation de carte

Postez ici vos questions, réponses, commentaires ou suggestions - Les sujets seront ultérieurement répartis dans les archives par les modérateurs

Modérateur : Groupe des modérateurs

Raoufou YESSOUFOU
Messages : 1
Enregistré le : 24 Oct 2017, 04:04

réalisation de carte

Messagepar Raoufou YESSOUFOU » 15 Fév 2018, 08:56

bonjour chers tous
Je suis confronté à un problème pour un code de réalisation de carte que j'ai utilisé. je suis un débutant. Voici le code que j'ai utilisé:
#chargement des packages nécessaires
library(sp)
library(RColorBrewer)
library(maptools)
library(rgdal)
#library(classInt)
library(readr)
#nettoyage de l'espace de travail / attention, cette commande effacera tous les #objets R créés dans la session courante!
rm(list=ls())
#fermeture de fenêtres graphiques éventuellement ouvertes
dev.off()
#definition du dossier de travail ou se trouvent les données et le fond de carte
setwd("Documents/R/Dossier_carte_Rosee")
#import des données à cartographier
dt <- read_delim("~/R/Dossier_carte_Rosee/data.csv",
+ ";", escape_double = FALSE, trim_ws = TRUE)
#import du fond de carte
fdc <- readOGR("D:/Documentation/BD_Benin/Benin_Communes.shp")
#Jointure entre le fond de carte et les données
fdc@data <- merge(fdc@data , by.x="INSEE_COM",by.y="CODGEO", all.x=TRUE)

Voici le résultat que j'ai obtenu
library(sp)
> library(RColorBrewer)
> library(maptools)
> library(rgdal)
> #library(classInt)
> library(readr)
> #nettoyage de l'espace de travail / attention, cette commande effacera tous les #objets R créés dans la session courante!
> rm(list=ls())
> #fermeture de fenêtres graphiques éventuellement ouvertes
> dev.off()
Error in dev.off() :
impossible de fermer le périphérique 1 (périphérique null)
> #definition du dossier de travail ou se trouvent les données et le fond de carte
> setwd("Documents/R/Dossier_carte_Rosee")
Error in setwd("Documents/R/Dossier_carte_Rosee") :
cannot change working directory
> #import des données à cartographier
> #dt <- read.csv( "Documents/R/Dossier_carte_Rosee/data.csv",header=TRUE,sep=";",dec=",",skip=0)
> dt <- read_delim("~/R/Dossier_carte_Rosee/data.csv",
+ ";", escape_double = FALSE, trim_ws = TRUE)
Parsed with column specification:
cols(
Annee = col_integer(),
Quant_Rosee_fallow = col_number()
)
> #création de la variable VAR_POP du taux d'accroissement de la population
> #dt$VAR_POP <- (dt$P09_POP-dt$P99_POP) / dt$P99_POP
> #import du fond de carte
> fdc <- readOGR("D:/Documentation/BD_Benin/Benin_Communes.shp")
OGR data source with driver: ESRI Shapefile
Source: "D:/Documentation/BD_Benin/Benin_Communes.shp", layer: "Benin_Communes"
with 77 features
It has 10 fields
> #Jointure entre le fond de carte et les données
> fdc@data <- merge(fdc@data , by.x="INSEE_COM",by.y="CODGEO", all.x=TRUE)
Error in as.data.frame(y) : argument "y" is missing, with no default
que faire chers tous?

Pierre-Yves Berrard
Messages : 1029
Enregistré le : 12 Jan 2016, 23:30

Re: réalisation de carte

Messagepar Pierre-Yves Berrard » 15 Fév 2018, 09:18

Raoufou YESSOUFOU a écrit :que faire chers tous?

Faire l'hypothèse que l'erreur est due à un problème dans la dernière ligne avant l'erreur (avant de balancer tout le programme ici) ?
Lire la documentation de la fonction merge ?
PY


Retourner vers « Questions en cours »

Qui est en ligne

Utilisateurs parcourant ce forum : Google [Bot] et 1 invité