道路データ(http://nlftp.mlit.go.jp/ksj/gml/datalist/KsjTmplt-N10.html)を
mapviewパッケージを利用して表示させたいのですが，表示できません．
データによっては表示できるのですが，原因は何でしょうか？

data <- 道路データ
pj2000 <- CRS("+init=epsg:4612")
road <- maptools::readShapeLines(data, proj4string = pj2000)
mapview::mapview(road)

なお，下記の例題(SpatialLinesDataFrameクラス)は表示させることは可能です．

library(mapview)
mapview(atlStorms2005)

よろしくお願い致します．

データは簡単な例題やkokudosuuchiパッケージ(http://notchained.hatenablog.com/entry/2016/11/08/220222)
を利用できればよかったのですが，うまくできなかったため，
データ取得先のURLで示させていただきます．