version 1.0.0

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: CoastlineFD
 Title: Calculate the Coastline Fractal Dimension
-Version: 0.1.6
+Version: 1.0.0
 Authors@R: person("Zhao Shiqi", role = c("aut", "cre"), email = "zhao0101010101@gmail.com")
 Author: Zhao Shiqi [aut, cre]
 Maintainer: Zhao Shiqi <zhao0101010101@gmail.com>
@@ -10,9 +10,9 @@ Description: A system is used to calculate the fractal dimension of coastline by
 License: MIT + file LICENSE
 Encoding: UTF-8
 RoxygenNote: 7.2.3
-Imports: fields, ggplot2, progress, rgdal, readxl, sf, sp, tidyr,
-        utils, writexl
+Imports: sf, tidyr, utils, fields, readxl, writexl, ggplot2, progress,
+        sfheaders
 NeedsCompilation: no
-Packaged: 2023-09-24 05:35:47 UTC; ZhaoShiqi
+Packaged: 2023-10-12 16:09:37 UTC; ZhaoShiqi
 Repository: CRAN
-Date/Publication: 2023-09-24 08:30:02 UTC
+Date/Publication: 2023-10-12 16:40:02 UTC

MD5

@@ -1,7 +1,7 @@
-3282925c0bbbe33668ae9d4be4e7e2ad *DESCRIPTION
+9841dc098d2800d037d1db46fd652d4f *DESCRIPTION
 1fed19e2b3949d09e097047f8867fe07 *LICENSE
-7dc4bbebb8d8937bbbee5c2e61788962 *NAMESPACE
-78b22018f650ecc22d92e0cb48237d3f *R/CoastlineFractalDimension.R
+5622d69e57aabe3c332c6fdc0b7b2fe3 *NAMESPACE
+6ca3cdb1ec385199d984f0d64fef5526 *R/CoastlineFractalDimension.R
 ae3b3df9970b49b6523e608759bc957d *inst/extdata/BoxesFD/shoreline1985.CPG
 f09d3dda2f3a6b0326e22d01c8159c7b *inst/extdata/BoxesFD/shoreline1985.dbf
 59c39fffa6e992ff49efa25811457e2a *inst/extdata/BoxesFD/shoreline1985.prj

NAMESPACE

@@ -5,9 +5,8 @@ import(fields)
 import(ggplot2)
 import(progress)
 import(readxl)
-import(rgdal)
 import(sf)
-import(sp)
+import(sfheaders)
 import(tidyr)
 import(utils)
 import(writexl)

R/CoastlineFractalDimension.R

@@ -46,14 +46,13 @@ Divider = function (line.x, line.y, line.id, r, flag) {
 Dividers_Functoin = function (path, r, pearsonValue) {
 
   # Getting required data
-  my_data_sp = readOGR(path, verbose = FALSE)
-  my_data_sf = st_as_sf(my_data_sp)
-  my_data_dataframe = fortify(my_data_sp)
+  my_data_sf = read_sf(path)
+  my_data_dataframe = sfc_to_df(my_data_sf$geometry)
 
   # Filtering required data
-  line.x = my_data_dataframe$lat
-  line.y = my_data_dataframe$long
-  line.id = my_data_dataframe$order
+  line.x = my_data_dataframe$x
+  line.y = my_data_dataframe$y
+  line.id = c(1:length(my_data_dataframe$sfg_id))
 
   # Calculating the fractal dimension
   results = vector()
@@ -139,15 +138,14 @@ Boxes_Function = function (path, netPath, n, pearsonValue) {
 #'
 #' @export
 #' @import sf
-#' @import sp
-#' @import rgdal
+#' @import tidyr
+#' @import utils
 #' @import readxl
 #' @import fields
 #' @import writexl
 #' @import ggplot2
 #' @import progress
-#' @import tidyr
-#' @import utils
+#' @import sfheaders
 #'
 #' @importFrom stats cor lm
 #'