renamed the package so the name matches with the project on github

DESCRIPTION

@@ -1,7 +1,7 @@
-Package: warmingStripes
+Package: WarmingStripes
 Type: Package
 Title: What the Package Does (Title Case)
-Version: 0.1.0
+Version: 0.2.0
 Author: c(person("Kai", "Budde", email = "kai.budde@uni-rostock.de",
     role = c("aut", "cre"))
 Maintainer: Kai Budde <kai.budde@uni-rostock.de>
@@ -10,5 +10,5 @@ Description: More about what it does (maybe more than one line)
 License: file LICENSE
 Encoding: UTF-8
 LazyData: true
-Imports: ggplot2, dplyr, lubridate, RColorBrewer, utils
+Imports: ggplot2, lubridate, dplyr, RColorBrewer, utils
 RoxygenNote: 6.1.1

NAMESPACE

@@ -1,6 +1,6 @@
 # Generated by roxygen2: do not edit by hand
 
-export(warmingStripes)
+export(WarmingStripes)
 import(RColorBrewer)
 import(dplyr)
 import(ggplot2)

R/warmingStripes.R → R/WarmingStripes.R

@@ -5,8 +5,9 @@
 #' red colors stand for higher mean temperatures and dark blue colors for
 #' lower mean temperatures.
 #' @aliases warmingstripes
+#' @aliases warmingStripes
 #' @author Kai Budde
-#' @export warmingStripes
+#' @export WarmingStripes
 #' @import ggplot2
 #' @import dplyr
 #' @import lubridate
@@ -18,9 +19,16 @@
 #' @param style A character
 
 # Created:     06/17/2019
-# Last edited: 06/19/2019
+# Last edited: 06/21/2019
 
-warmingStripes <- function(input_file, startyear.mean = 1961, endyear.mean = 1990, style = "continuous") {
+WarmingStripes <- function(input_file,
+                           startyear.mean = 1961,
+                           endyear.mean = 1990,
+                           style = "continuous") {
+
+  # Set warnings off
+  oldw <- getOption("warn")
+  options(warn = -1)
 
   # import the annual temperatures
   df.temp <- utils::read.csv(input_file)
@@ -166,4 +174,7 @@ warmingStripes <- function(input_file, startyear.mean = 1961, endyear.mean = 199
 
   ggsave(filename = "WarmingStripes.pdf", width = 297, height = 210, units = "mm")
 
+  # Turn warnings on
+  options(warn = oldw)
+
   }

README.md

@@ -9,7 +9,7 @@ In order to create a warming stripes plot of Rostock (example data), one needs t
 ```R
 library(devtools)
 install()
-require(warmingStripes)
+require(WarmingStripes)
 input_file <- "inst/data/data_TMK_MN004.csv"
 warmingStripes(input_file = input_file)
 ```