styling changes

DESCRIPTION

@@ -1,7 +1,7 @@
 Type: Package
 Package: gtfsio
 Title: Read and Write General Transit Feed Specification (GTFS) Files
-Version: 0.1.2.9002
+Version: 0.1.2.9003
 Authors@R: 
     c(person(given = "Daniel",
              family = "Herszenhut",

R/gtfs_methods.R

@@ -27,19 +27,23 @@ print.gtfs <- function(x, ...) {
 
 #' Print summary of a GTFS object
 #'
-#' @name summary.gtfs
-#' @param object A GTFS object
-#' @param ... ignored here
+#' @param object A GTFS object.
+#' @param ... Ignored.
 #'
 #' @examples
 #' gtfs_path <- system.file("extdata/ggl_gtfs.zip", package = "gtfsio")
 #' gtfs <- import_gtfs(gtfs_path)
-#' summary (gtfs)
+#'
+#' summary(gtfs)
+#'
 #' @export
-summary.gtfs <- function (object, ...) {
+summary.gtfs <- function(object, ...) {
+
+    cat(
+      "A gtfs object with the following tables",
+      "and respective numbers of entries in each:\n"
+    )
 
-    cat ("A gtfs object with the following tables ",
-         "and respective numbers of entries in each:\n")
+    print(vapply(object, nrow, numeric(1)))
 
-    print (vapply (object, nrow, numeric (1)))
 }

R/import_gtfs.R

@@ -193,10 +193,13 @@ import_gtfs <- function(path,
   # assign names to 'gtfs', noting that zip_list may return full paths, which
   # need to be stripped here
 
-  file_names <- vapply (files_to_read, function (i)
-                        utils::tail (strsplit (i, .Platform$file.sep) [[1]], 1),
-                        character (1),
-                        USE.NAMES = FALSE)
+  file_names <- vapply(
+    files_to_read,
+    function(i) utils::tail(strsplit(i, .Platform$file.sep)[[1]], 1),
+    character(1),
+    USE.NAMES = FALSE
+  )
+
   names(gtfs) <- file_names
 
   # create gtfs object from 'gtfs'

codemeta.json

@@ -10,7 +10,7 @@
   "codeRepository": "https://github.com/r-transit/gtfsio",
   "issueTracker": "https://github.com/r-transit/gtfsio/issues",
   "license": "https://spdx.org/licenses/MIT",
-  "version": "0.1.2.9002",
+  "version": "0.1.2.9003",
   "programmingLanguage": {
     "@type": "ComputerLanguage",
     "name": "R",
@@ -123,7 +123,7 @@
       "sameAs": "https://CRAN.R-project.org/package=zip"
     }
   ],
-  "fileSize": "151533.981KB",
+  "fileSize": "151533.906KB",
   "keywords": [
     "r",
     "gtfs"