fix utf-8 issue + add png in readme

README.md

@@ -13,6 +13,8 @@ This data is available in several objects:
 - BE_ADMIN_HIERARCHY: data.frame with administrative hierarchy of Belgium
 - BE_ADMIN_AGGLOMERATIONS: SpatialPolygonsDataFrame with polygons and data at the level of an agglomeration (200m)
 
+![](inst/img/belgiummaps_statbel.png)
+
 
 ## Installation
 

inst/dev/01_import.R

@@ -62,7 +62,8 @@ colnames(BE_ADMIN_SECTORS@data) <- tolower(make.names(colnames(BE_ADMIN_SECTORS@
 
 isutf8 <- function(x){
   for(column in colnames(x)){
-    if(is.character(x[[column]])){
+    if(is.character(x[[column]]) | is.factor(x[[column]])){
+      x[[column]] <- as.character(x[[column]])
       Encoding(x[[column]]) <- "UTF-8"
     }
   }