Converting from Behrmann CRS map to +proj=longlat WGS84 in R












0















I have a shapefile of grid cells of 200km x 200km covering land areas of the world in Behrmann Equal Area Cylindrical projection. My goal is to convert the shapefile to +proj=longlat WGS84 format so I can match it to maps in commonly used projections such as wrld_simpl in maptools. However, I have not been successful and would appreciate some help with this.



rm(list = ls())
library(RCurl)
library(raster)
library(maptools)
library(rgdal)
data("wrld_simpl")

tmp <- tempfile() download.file("https://github.com/darunabas/extras/blob/master/temp_shapefile.zip?raw=true", destfile = tmp)
unzip(tmp, exdir = ".")

s <- rgdal::readOGR("temp_shapefile")
proj4string(s) = CRS("+proj=cea +lon_0=0 +lat_ts=30 +x_0=0 +y_0=0 +datum=WGS84 +ellps=WGS84 +units=m +no_defs")

p <- spTransform(s, CRS("+proj=longlat +datum=WGS84"))


I got the following error:
non finite transformation detected:
[,1] [,2] [,3] [,4]
Error in .spTransform_Polygon(input[[i]], to_args = to_args, from_args = from_args, :
failure in Polygons 1106 Polygon 1 points
In addition: Warning message:
In .spTransform_Polygon(input[[i]], to_args = to_args, from_args = from_args, :
2 projected point(s) not finite










share|improve this question





























    0















    I have a shapefile of grid cells of 200km x 200km covering land areas of the world in Behrmann Equal Area Cylindrical projection. My goal is to convert the shapefile to +proj=longlat WGS84 format so I can match it to maps in commonly used projections such as wrld_simpl in maptools. However, I have not been successful and would appreciate some help with this.



    rm(list = ls())
    library(RCurl)
    library(raster)
    library(maptools)
    library(rgdal)
    data("wrld_simpl")

    tmp <- tempfile() download.file("https://github.com/darunabas/extras/blob/master/temp_shapefile.zip?raw=true", destfile = tmp)
    unzip(tmp, exdir = ".")

    s <- rgdal::readOGR("temp_shapefile")
    proj4string(s) = CRS("+proj=cea +lon_0=0 +lat_ts=30 +x_0=0 +y_0=0 +datum=WGS84 +ellps=WGS84 +units=m +no_defs")

    p <- spTransform(s, CRS("+proj=longlat +datum=WGS84"))


    I got the following error:
    non finite transformation detected:
    [,1] [,2] [,3] [,4]
    Error in .spTransform_Polygon(input[[i]], to_args = to_args, from_args = from_args, :
    failure in Polygons 1106 Polygon 1 points
    In addition: Warning message:
    In .spTransform_Polygon(input[[i]], to_args = to_args, from_args = from_args, :
    2 projected point(s) not finite










    share|improve this question



























      0












      0








      0








      I have a shapefile of grid cells of 200km x 200km covering land areas of the world in Behrmann Equal Area Cylindrical projection. My goal is to convert the shapefile to +proj=longlat WGS84 format so I can match it to maps in commonly used projections such as wrld_simpl in maptools. However, I have not been successful and would appreciate some help with this.



      rm(list = ls())
      library(RCurl)
      library(raster)
      library(maptools)
      library(rgdal)
      data("wrld_simpl")

      tmp <- tempfile() download.file("https://github.com/darunabas/extras/blob/master/temp_shapefile.zip?raw=true", destfile = tmp)
      unzip(tmp, exdir = ".")

      s <- rgdal::readOGR("temp_shapefile")
      proj4string(s) = CRS("+proj=cea +lon_0=0 +lat_ts=30 +x_0=0 +y_0=0 +datum=WGS84 +ellps=WGS84 +units=m +no_defs")

      p <- spTransform(s, CRS("+proj=longlat +datum=WGS84"))


      I got the following error:
      non finite transformation detected:
      [,1] [,2] [,3] [,4]
      Error in .spTransform_Polygon(input[[i]], to_args = to_args, from_args = from_args, :
      failure in Polygons 1106 Polygon 1 points
      In addition: Warning message:
      In .spTransform_Polygon(input[[i]], to_args = to_args, from_args = from_args, :
      2 projected point(s) not finite










      share|improve this question
















      I have a shapefile of grid cells of 200km x 200km covering land areas of the world in Behrmann Equal Area Cylindrical projection. My goal is to convert the shapefile to +proj=longlat WGS84 format so I can match it to maps in commonly used projections such as wrld_simpl in maptools. However, I have not been successful and would appreciate some help with this.



      rm(list = ls())
      library(RCurl)
      library(raster)
      library(maptools)
      library(rgdal)
      data("wrld_simpl")

      tmp <- tempfile() download.file("https://github.com/darunabas/extras/blob/master/temp_shapefile.zip?raw=true", destfile = tmp)
      unzip(tmp, exdir = ".")

      s <- rgdal::readOGR("temp_shapefile")
      proj4string(s) = CRS("+proj=cea +lon_0=0 +lat_ts=30 +x_0=0 +y_0=0 +datum=WGS84 +ellps=WGS84 +units=m +no_defs")

      p <- spTransform(s, CRS("+proj=longlat +datum=WGS84"))


      I got the following error:
      non finite transformation detected:
      [,1] [,2] [,3] [,4]
      Error in .spTransform_Polygon(input[[i]], to_args = to_args, from_args = from_args, :
      failure in Polygons 1106 Polygon 1 points
      In addition: Warning message:
      In .spTransform_Polygon(input[[i]], to_args = to_args, from_args = from_args, :
      2 projected point(s) not finite







      r wgs84






      share|improve this question















      share|improve this question













      share|improve this question




      share|improve this question








      edited Jan 19 at 5:01







      BHD

















      asked Jan 19 at 3:32









      BHDBHD

      62




      62
























          1 Answer
          1






          active

          oldest

          votes


















          0














          I'm not very experienced in the geo-worls, but this might help:



          library( sf )
          sf <- read_sf( "./temp_shapefile.shp")
          st_crs( sf ) <- "+proj=cea +lon_0=0 +lat_ts=30 +x_0=0 +y_0=0 +datum=WGS84 +ellps=WGS84 +units=m +no_defs"
          sf2 <- st_transform( sf, crs = "+proj=longlat +datum=WGS84" )





          share|improve this answer
























          • Thanks for the suggestion @Wimpel. Although it didn't return any error, the resulting plot looks very weird with a long line stretching below the equator and many grid cells are missing in the projected map.

            – BHD
            Jan 20 at 21:06











          Your Answer






          StackExchange.ifUsing("editor", function () {
          StackExchange.using("externalEditor", function () {
          StackExchange.using("snippets", function () {
          StackExchange.snippets.init();
          });
          });
          }, "code-snippets");

          StackExchange.ready(function() {
          var channelOptions = {
          tags: "".split(" "),
          id: "1"
          };
          initTagRenderer("".split(" "), "".split(" "), channelOptions);

          StackExchange.using("externalEditor", function() {
          // Have to fire editor after snippets, if snippets enabled
          if (StackExchange.settings.snippets.snippetsEnabled) {
          StackExchange.using("snippets", function() {
          createEditor();
          });
          }
          else {
          createEditor();
          }
          });

          function createEditor() {
          StackExchange.prepareEditor({
          heartbeatType: 'answer',
          autoActivateHeartbeat: false,
          convertImagesToLinks: true,
          noModals: true,
          showLowRepImageUploadWarning: true,
          reputationToPostImages: 10,
          bindNavPrevention: true,
          postfix: "",
          imageUploader: {
          brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
          contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
          allowUrls: true
          },
          onDemand: true,
          discardSelector: ".discard-answer"
          ,immediatelyShowMarkdownHelp:true
          });


          }
          });














          draft saved

          draft discarded


















          StackExchange.ready(
          function () {
          StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f54263850%2fconverting-from-behrmann-crs-map-to-proj-longlat-wgs84-in-r%23new-answer', 'question_page');
          }
          );

          Post as a guest















          Required, but never shown

























          1 Answer
          1






          active

          oldest

          votes








          1 Answer
          1






          active

          oldest

          votes









          active

          oldest

          votes






          active

          oldest

          votes









          0














          I'm not very experienced in the geo-worls, but this might help:



          library( sf )
          sf <- read_sf( "./temp_shapefile.shp")
          st_crs( sf ) <- "+proj=cea +lon_0=0 +lat_ts=30 +x_0=0 +y_0=0 +datum=WGS84 +ellps=WGS84 +units=m +no_defs"
          sf2 <- st_transform( sf, crs = "+proj=longlat +datum=WGS84" )





          share|improve this answer
























          • Thanks for the suggestion @Wimpel. Although it didn't return any error, the resulting plot looks very weird with a long line stretching below the equator and many grid cells are missing in the projected map.

            – BHD
            Jan 20 at 21:06
















          0














          I'm not very experienced in the geo-worls, but this might help:



          library( sf )
          sf <- read_sf( "./temp_shapefile.shp")
          st_crs( sf ) <- "+proj=cea +lon_0=0 +lat_ts=30 +x_0=0 +y_0=0 +datum=WGS84 +ellps=WGS84 +units=m +no_defs"
          sf2 <- st_transform( sf, crs = "+proj=longlat +datum=WGS84" )





          share|improve this answer
























          • Thanks for the suggestion @Wimpel. Although it didn't return any error, the resulting plot looks very weird with a long line stretching below the equator and many grid cells are missing in the projected map.

            – BHD
            Jan 20 at 21:06














          0












          0








          0







          I'm not very experienced in the geo-worls, but this might help:



          library( sf )
          sf <- read_sf( "./temp_shapefile.shp")
          st_crs( sf ) <- "+proj=cea +lon_0=0 +lat_ts=30 +x_0=0 +y_0=0 +datum=WGS84 +ellps=WGS84 +units=m +no_defs"
          sf2 <- st_transform( sf, crs = "+proj=longlat +datum=WGS84" )





          share|improve this answer













          I'm not very experienced in the geo-worls, but this might help:



          library( sf )
          sf <- read_sf( "./temp_shapefile.shp")
          st_crs( sf ) <- "+proj=cea +lon_0=0 +lat_ts=30 +x_0=0 +y_0=0 +datum=WGS84 +ellps=WGS84 +units=m +no_defs"
          sf2 <- st_transform( sf, crs = "+proj=longlat +datum=WGS84" )






          share|improve this answer












          share|improve this answer



          share|improve this answer










          answered Jan 19 at 6:58









          WimpelWimpel

          4,725321




          4,725321













          • Thanks for the suggestion @Wimpel. Although it didn't return any error, the resulting plot looks very weird with a long line stretching below the equator and many grid cells are missing in the projected map.

            – BHD
            Jan 20 at 21:06



















          • Thanks for the suggestion @Wimpel. Although it didn't return any error, the resulting plot looks very weird with a long line stretching below the equator and many grid cells are missing in the projected map.

            – BHD
            Jan 20 at 21:06

















          Thanks for the suggestion @Wimpel. Although it didn't return any error, the resulting plot looks very weird with a long line stretching below the equator and many grid cells are missing in the projected map.

          – BHD
          Jan 20 at 21:06





          Thanks for the suggestion @Wimpel. Although it didn't return any error, the resulting plot looks very weird with a long line stretching below the equator and many grid cells are missing in the projected map.

          – BHD
          Jan 20 at 21:06


















          draft saved

          draft discarded




















































          Thanks for contributing an answer to Stack Overflow!


          • Please be sure to answer the question. Provide details and share your research!

          But avoid



          • Asking for help, clarification, or responding to other answers.

          • Making statements based on opinion; back them up with references or personal experience.


          To learn more, see our tips on writing great answers.




          draft saved


          draft discarded














          StackExchange.ready(
          function () {
          StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f54263850%2fconverting-from-behrmann-crs-map-to-proj-longlat-wgs84-in-r%23new-answer', 'question_page');
          }
          );

          Post as a guest















          Required, but never shown





















































          Required, but never shown














          Required, but never shown












          Required, but never shown







          Required, but never shown

































          Required, but never shown














          Required, but never shown












          Required, but never shown







          Required, but never shown







          Popular posts from this blog

          Homophylophilia

          Updating UILabel text programmatically using a function

          Cloud Functions - OpenCV Videocapture Read method fails for larger files from cloud storage