diff --git a/data/iris_dataset.rda b/data/iris_dataset.rda
index e28cf59..0dd813e 100644
Binary files a/data/iris_dataset.rda and b/data/iris_dataset.rda differ
diff --git a/tests/testthat/test-datacite.R b/tests/testthat/test-datacite.R
index 8cb84f9..9ff7008 100644
--- a/tests/testthat/test-datacite.R
+++ b/tests/testthat/test-datacite.R
@@ -1,12 +1,12 @@
-iris_datacite <- datacite(
-   Title = "Iris Dataset",
-   Creator = person(family="Anderson", given ="Edgar", role = "aut"),
-   Publisher = "American Iris Society",
-   PublicationYear = 1935,
-   Geolocation = "US",
-   Language = "en")
 
 test_that("datacite() works", {
+  iris_datacite <- datacite(
+    Title = "Iris Dataset",
+    Creator = person(family="Anderson", given ="Edgar", role = "aut"),
+    Publisher = "American Iris Society",
+    PublicationYear = 1935,
+    Geolocation = "US",
+    Language = "en")
   expect_true(is.datacite(iris_datacite))
   expect_equal(iris_datacite$language, 'en')
   expect_equal(iris_datacite$geolocation, 'US')
diff --git a/tests/testthat/test-dublincore.R b/tests/testthat/test-dublincore.R
index 4c01817..d750a12 100644
--- a/tests/testthat/test-dublincore.R
+++ b/tests/testthat/test-dublincore.R
@@ -33,8 +33,6 @@ test_that("dublincore() works", {
   expect_equal(dct_iris$description, "The famous (Fisher's or Anderson's) iris data set gives the measurements in centimeters of the variables sepal length and width and petal length and width, respectively, for 50 flowers from each of 3 species of iris. The species are Iris setosa, versicolor, and virginica.")
 })
 
-x = iris_dataset
-
 test_that("as_dublincore() works", {
   expect_true(is.dublincore(as_dublincore(iris_dataset)))
   expect_true(is.list(as_dublincore(x=iris_dataset, type="list")))