I used to travel quite often with DFDS from Newcastle (North Shields) to Amsterdam (Ijmuiden) when I was a business analyst and partner in a company in Germany. As such I spent many nights on the North Sea on DFDS ships and saw many of the ships and ATons, Wind farms. I see them now again as data points.
291826 AIS positional signals were detected from 36 ships that have the word “Seaways” in their name and whose AIS signals were transmitted over AISHUB. Data was recorded from 2017-12-17 01:22:23 to 2018-01-05 00:56:17.
DFDS operates mostly in Europe, although some (probably wrongly transmitted) positions were picked up along longitude 0. Dark to grey dots under Africa.
Otherwise the density of recorded AIS positions is mostly in Europe.
Here is a point map of these densities
Maps were generated with ggplot and ggmap in R.
library(ggplot2) library(ggmap) library(grid) lonlat <- read.csv("C:/Users/X/Documents/AIS/dfdslog.csv", header=TRUE) lon <- lonlat$Lon lat <- lonlat$LAT MMSI <- lonlat$MMSI NAME <- lonlat$NAME df <- as.data.frame(cbind(lon,lat)) mapgilbert <- get_map(location = c(lon = median(df$lon), lat = median(df$lat)), source = "stamen", zoom = 4,maptype = "toner-lite", scale = 1) #density ggmap(mapgilbert, extent = "device") + geom_density2d(data = df, aes(x = lon, y = lat), size = 0.3) + stat_density2d(data = df, aes(x = lon, y = lat, fill = ..level.., alpha = ..level..), size = 0.01, bins = 256, geom = "polygon") + scale_fill_gradient(low = "green", high = "red") + scale_alpha(range = c(0, 1), guide = FALSE) #points ggmap(mapgilbert, extent = "device")+ geom_point(aes(x = lon, y = lat), colour = "red", alpha = 0.1, size = 1, data = df)
Here is the table of the ships and how often they reported their position over AISHUB,