Adding the R project

DESCRIPTION

+Package: vsop
+Title: Organizing vsop data
+Version: 0.0.0.9000
+Authors@R: 
+    person(given = "Helmer",
+           family = "Belbo",
+           role = c("aut", "cre"),
+           email = "first.last@example.com",
+           comment = c(ORCID = "YOUR-ORCID-ID"))
+Description: Reads in Norwegian logging stats provided in excel files from Ldir.
+License: Creative commons
+Encoding: UTF-8
+LazyData: true
+RoxygenNote: 7.0.2

NAMESPACE

+# Generated by roxygen2: do not edit by hand
+
+export(fylkesvis_mnd)

R/VSOP_fylke_mnd.R

+
+#' Fylkesvis pr mnd
+#' @description a simple function to gather fylkesvise logging  data from excel files
+#' @return a tibble with logging statistics
+#' @param Behøver ingen parametere. Datafilene ligger i egen folder.
+#' @export
+#'
+#' @examples devtools::install_github("hbelbo/vsop")
+#' fylkesvis_mnd()
+fylkesvis_mnd = function(){
+  files <-   list.files(path = (system.file("extdata", package = "vsop")) ,
+                        pattern = ".xlsx", full.names = T) %>%
+    .[which(!stringr::str_detect(., "~"))] %>%
+    .[which(stringr::str_detect(., "Fylkesvis avvirkning pr måned "))]
+
+  df = readxl::read_xlsx(path = files[1], sheet = 1, skip = 2, col_names = T)[NULL, ]
+  for (i in seq_along(files)){
+    df = rbind(df, readxl::read_xlsx(path = files[i], sheet = 1, skip = 2, col_names = T))
+  }
+  return(df)
+}
+
+

man/fylkesvis_mnd.Rd

+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/VSOP_fylke_mnd.R
+\name{fylkesvis_mnd}
+\alias{fylkesvis_mnd}
+\title{Fylkesvis pr mnd}
+\usage{
+fylkesvis_mnd()
+}
+\arguments{
+\item{Behøver}{ingen parametere. Datafilene ligger i egen folder.}
+}
+\value{
+a tibble with logging statistics
+}
+\description{
+a simple function to gather fylkesvise logging  data from excel files
+}
+\examples{
+devtools::install_github("hbelbo/vsop")
+fylkesvis_mnd()
+}

vsop.Rproj

+Version: 1.0
+
+RestoreWorkspace: No
+SaveWorkspace: No
+AlwaysSaveHistory: Default
+
+EnableCodeIndexing: Yes
+UseSpacesForTab: Yes
+NumSpacesForTab: 2
+Encoding: UTF-8
+
+RnwWeave: Sweave
+LaTeX: pdfLaTeX
+
+AutoAppendNewline: Yes
+StripTrailingWhitespace: Yes
+
+BuildType: Package
+PackageUseDevtools: Yes
+PackageInstallArgs: --no-multiarch --with-keep.source
+PackageRoxygenize: rd,collate,namespace