Merge pull request #3 from krlmlr/f-lesmis

Author: krlmlr

Diff for: NAMESPACE

@@ -1,2 +1,5 @@
 # Generated by roxygen2: do not edit by hand
 
+export(lesmis_gml)
+export(lesmis_graphml)
+export(lesmis_pajek)

Diff for: R/files.R

@@ -0,0 +1,23 @@
+#' Example files
+#'
+#' Functions that return paths to example files of the "Les Miserables" example network,
+#' in the GML, GraphML or Pajek format.
+#'
+#' @return A string indicating an absolute path to a file.
+#' @name lesmis
+#' @export
+lesmis_gml <- function() {
+  system.file("files/lesmis.gml", package = "igraphdata", mustWork = TRUE)
+}
+
+#' @export
+#' @rdname lesmis
+lesmis_graphml <- function() {
+  system.file("files/lesmis.graphml", package = "igraphdata", mustWork = TRUE)
+}
+
+#' @export
+#' @rdname lesmis
+lesmis_pajek <- function() {
+  system.file("files/lesmis.net", package = "igraphdata", mustWork = TRUE)
+}