L05 some additions and bugfix in l. 165/166

R/BIA_L05_Geographic_Time_Data.Rmd

@@ -51,6 +51,9 @@ axis(2)
 
 #Here, we have polygons that we can colorate
 plot(ger.shp, col=1:23)
+
+#see the data stored in the shapefile
+View(ger.shp@data)
 ```
 
 As an example, the housing statistics from the German Federal Ministry of Statistics is used
@@ -91,6 +94,7 @@ housing_statistic_DE <- read_csv2("../data/housing_statistic_germany_31231-0003.
                                         decimal_mark = ",", 
                                         grouping_mark = "."))  
 
+View(housing_statistic_DE)
 
 #calculate the relative distribution of total living area 
 housing_statistic_DE$total_livingarea_rel <- housing_statistic_DE$total_livingarea / max(housing_statistic_DE$total_livingarea)
@@ -147,7 +151,12 @@ points(as_sp(erba_data, what = "points"), pch=16, col=2, cex=0.5)
 axis(1)
 axis(2)
 
-erba_data$nodes$attrs
+#display the data stored for each object
+View(erba_data$nodes$attrs)
+
+#display the tags stored for each object (contain the geographic meaning)
+View(erba_data$nodes$attrs)
+
 ```
 
 # Practicals for the date and time handling
@@ -160,10 +169,10 @@ Sys.setenv(TZ="CET")
 
 dmy(13112018)
 ymd("20181113")
-mdy("November 13th, 2018")
+mdy(c("November 13th, 2018", "11/ 13/ 2018"))
 
-dmy_hms("13.11.2018 11:15")
-dmy_hms("13.11.2018 11:15", tz = "CET")
+dmy_hm("13.11.2018 11:15")
+dmy_hms("13.11.2018 11:15:01", tz = "CET")
 
 today()
 now()